home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 115 / macaddict115.cdr / Software / Development / REALbasicMacOSX.dmg / REALbasic 2005 Release 4 / REALbasic 2005.app / Contents / Resources / wordclasses < prev    next >
Text File  |  2005-07-15  |  172KB  |  4,332 lines

  1. Class WordApplication
  2. inherits OLEObject
  3.     dim ActiveDocument as WordDocument
  4.     dim ActivePrinter as string
  5.     dim ActiveWindow as WordWindow
  6.     dim AddIns as WordAddIns
  7.     dim AnswerWizard as OLEObject
  8.     dim Application as WordApplication
  9.     dim Assistant as OLEObject
  10.     dim AutoCaptions as WordAutoCaptions
  11.     dim AutoCorrect as WordAutoCorrect
  12.     dim BackgroundPrintingStatus as integer
  13.     dim BackgroundSavingStatus as integer
  14.     dim BrowseExtraFileTypes as string
  15.     dim Browser as WordBrowser
  16.     dim Build as string
  17.     dim CapsLock as boolean
  18.     dim Caption as string
  19.     dim CaptionLabels as WordCaptionLabels
  20.     dim CheckLanguage as boolean
  21.     dim COMAddIns as OLEObject
  22.     dim CommandBars as variant
  23.     dim Creator as integer
  24.     dim CustomDictionaries as WordDictionaries
  25.     dim CustomizationContext as OLEObject
  26.     dim DefaultSaveFormat as string
  27.     dim DefaultTableSeparator as string
  28.     dim Dialogs as WordDialogs
  29.     dim DisplayAlerts as integer
  30.     dim DisplayAutoCompleteTips as boolean
  31.     dim DisplayRecentFiles as boolean
  32.     dim DisplayScreenTips as boolean
  33.     dim DisplayScrollBars as boolean
  34.     dim DisplayStatusBar as boolean
  35.     dim Documents as WordDocuments
  36.     dim Dummy1 as boolean
  37.     dim EmailOptions as WordEmailOptions
  38.     dim EnableCancelKey as integer
  39.     dim FeatureInstall as integer
  40.     dim FileConverters as WordFileConverters
  41.     dim FileSearch as OLEObject
  42.     dim FocusInMailHeader as boolean
  43.     dim FontNames as WordFontNames
  44.     dim HangulHanjaDictionaries as WordHangulHanjaConversionDictionaries
  45.     dim Height as integer
  46.     dim KeyBindings as WordKeyBindings
  47.     dim LandscapeFontNames as WordFontNames
  48.     dim Language as integer
  49.     dim Languages as WordLanguages
  50.     dim LanguageSettings as OLEObject
  51.     dim Left as integer
  52.     dim ListGalleries as WordListGalleries
  53.     dim MacroContainer as OLEObject
  54.     dim MailingLabel as WordMailingLabel
  55.     dim MailMessage as WordMailMessage
  56.     dim MailSystem as integer
  57.     dim MAPIAvailable as boolean
  58.     dim MathCoprocessorAvailable as boolean
  59.     dim MouseAvailable as boolean
  60.     dim Name as string
  61.     dim NormalTemplate as WordTemplate
  62.     dim NumLock as boolean
  63.     dim Options as WordOptions
  64.     dim Parent as OLEObject
  65.     dim Path as string
  66.     dim PathSeparator as string
  67.     dim PortraitFontNames as WordFontNames
  68.     dim PrintPreview as boolean
  69.     dim RecentFiles as WordRecentFiles
  70.     dim ScreenUpdating as boolean
  71.     dim Selection as WordSelection
  72.     dim ShowVisualBasicEditor as boolean
  73.     dim SpecialMode as boolean
  74.     dim StartupPath as string
  75.     dim StatusBar as string
  76.     dim System as WordSystem
  77.     dim Tasks as WordTasks
  78.     dim Templates as WordTemplates
  79.     dim Top as integer
  80.     dim UsableHeight as integer
  81.     dim UsableWidth as integer
  82.     dim UserAddress as string
  83.     dim UserControl as boolean
  84.     dim UserInitials as string
  85.     dim UserName as string
  86.     dim VBE as VBE
  87.     dim Version as string
  88.     dim Visible as boolean
  89.     dim Width as integer
  90.     dim Windows as WordWindows
  91.     dim WindowState as integer
  92.     dim WordBasic as OLEObject
  93.     Sub Activate()
  94.     Sub AddAddress(TagID_Param as variant, Value_Param as variant)
  95.     Sub AutomaticChange()
  96.     Function BuildKeyCode(Arg1_Param as integer, Arg2_Param as variant, Arg3_Param as variant, Arg4_Param as variant) as integer
  97.     Function CentimetersToPoints(Centimeters_Param as single) as single
  98.     Sub ChangeFileOpenDirectory(Path_Param as string)
  99.     Function CheckGrammar(String_Param as string) as boolean
  100.     Function CheckSpelling(Word_Param as string, CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, MainDictionary_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant) as boolean
  101.     Function CleanString(String_Param as string) as string
  102.     Sub DDEExecute(Channel_Param as integer, Command_Param as string)
  103.     Function DDEInitiate(App_Param as string, Topic_Param as string) as integer
  104.     Sub DDEPoke(Channel_Param as integer, Item_Param as string, Data_Param as string)
  105.     Function DDERequest(Channel_Param as integer, Item_Param as string) as string
  106.     Sub DDETerminate(Channel_Param as integer)
  107.     Sub DDETerminateAll()
  108.     Function DefaultWebOptions() as WordDefaultWebOptions
  109.     Sub DiscussionSupport(Range_Param as variant, cid_Param as variant, piCSE_Param as variant)
  110.     Function FindKey(KeyCode_Param as integer, KeyCode2_Param as variant) as WordKeyBinding
  111.     Function GetAddress(Name_Param as variant, AddressProperties_Param as variant, UseAutoText_Param as variant, DisplaySelectDialog_Param as variant, SelectDialog_Param as variant, CheckNamesDialog_Param as variant, RecentAddressesChoice_Param as variant, UpdateRecentAddresses_Param as variant) as string
  112.     Function GetDefaultTheme(DocumentType_Param as integer) as string
  113.     Function GetSpellingSuggestions(Word_Param as string, CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, MainDictionary_Param as variant, SuggestionMode_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant) as WordSpellingSuggestions
  114.     Sub GoBack()
  115.     Sub GoForward()
  116.     Sub Help(HelpType_Param as variant)
  117.     Sub HelpTool()
  118.     Function InchesToPoints(Inches_Param as single) as single
  119.     Function International(Index_Param as integer) as variant
  120.     Function IsObjectValid(Object_Param as OLEObject) as boolean
  121.     Function Keyboard(LangId_Param as integer) as integer
  122.     Sub KeyboardBidi()
  123.     Sub KeyboardLatin()
  124.     Function KeysBoundTo(KeyCategory_Param as integer, Command_Param as string, CommandParameter_Param as variant) as WordKeysBoundTo
  125.     Function KeyString(KeyCode_Param as integer, KeyCode2_Param as variant) as string
  126.     Function LinesToPoints(Lines_Param as single) as single
  127.     Sub ListCommands(ListAllCommands_Param as boolean)
  128.     Sub LookupNameProperties(Name_Param as string)
  129.     Function MillimetersToPoints(Millimeters_Param as single) as single
  130.     Function MountVolume(Zone_Param as string, Server_Param as string, Volume_Param as string, User_Param as variant, UserPassword_Param as variant, VolumePassword_Param as variant) as integer
  131.     Sub Move(Left_Param as integer, Top_Param as integer)
  132.     Function NewWindow() as WordWindow
  133.     Sub NextLetter()
  134.     Sub OnTime(When_Param as variant, Name_Param as string, Tolerance_Param as variant)
  135.     Sub OrganizerCopy(Source_Param as string, Destination_Param as string, Name_Param as string, Object_Param as integer)
  136.     Sub OrganizerDelete(Source_Param as string, Name_Param as string, Object_Param as integer)
  137.     Sub OrganizerRename(Source_Param as string, Name_Param as string, NewName_Param as string, Object_Param as integer)
  138.     Function PicasToPoints(Picas_Param as single) as single
  139.     Function PixelsToPoints(Pixels_Param as single, fVertical_Param as variant) as single
  140.     Function PointsToCentimeters(Points_Param as single) as single
  141.     Function PointsToInches(Points_Param as single) as single
  142.     Function PointsToLines(Points_Param as single) as single
  143.     Function PointsToMillimeters(Points_Param as single) as single
  144.     Function PointsToPicas(Points_Param as single) as single
  145.     Function PointsToPixels(Points_Param as single, fVertical_Param as variant) as single
  146.     Sub PrintOut(Background_Param as variant, Append_Param as variant, Range_Param as variant, OutputFileName_Param as variant, From_Param as variant, To_Param as variant, Item_Param as variant, Copies_Param as variant, Pages_Param as variant, PageType_Param as variant, PrintToFile_Param as variant, Collate_Param as variant, FileName_Param as variant, ActivePrinterMacGX_Param as variant, ManualDuplexPrint_Param as variant, PrintZoomColumn_Param as variant, PrintZoomRow_Param as variant, PrintZoomPaperWidth_Param as variant, PrintZoomPaperHeight_Param as variant)
  147.     Sub PrintOutOld(Background_Param as variant, Append_Param as variant, Range_Param as variant, OutputFileName_Param as variant, From_Param as variant, To_Param as variant, Item_Param as variant, Copies_Param as variant, Pages_Param as variant, PageType_Param as variant, PrintToFile_Param as variant, Collate_Param as variant, FileName_Param as variant, ActivePrinterMacGX_Param as variant, ManualDuplexPrint_Param as variant)
  148.     Function ProductCode() as string
  149.     Sub Quit(SaveChanges_Param as variant, OriginalFormat_Param as variant, RouteDocument_Param as variant)
  150.     Function Repeat(Times_Param as variant) as boolean
  151.     Sub ResetIgnoreAll()
  152.     Sub Resize(Width_Param as integer, Height_Param as integer)
  153.     Function Run(MacroName_Param as string, varg1_Param as variant, varg2_Param as variant, varg3_Param as variant, varg4_Param as variant, varg5_Param as variant, varg6_Param as variant, varg7_Param as variant, varg8_Param as variant, varg9_Param as variant, varg10_Param as variant, varg11_Param as variant, varg12_Param as variant, varg13_Param as variant, varg14_Param as variant, varg15_Param as variant, varg16_Param as variant, varg17_Param as variant, varg18_Param as variant, varg19_Param as variant, varg20_Param as variant, varg21_Param as variant, varg22_Param as variant, varg23_Param as variant, varg24_Param as variant, varg25_Param as variant, varg26_Param as variant, varg27_Param as variant, varg28_Param as variant, varg29_Param as variant, varg30_Param as variant) as variant
  154.     Sub RunOld(MacroName_Param as string)
  155.     Sub ScreenRefresh()
  156.     Sub SendFax()
  157.     Sub SetDefaultTheme(Name_Param as string, DocumentType_Param as integer)
  158.     Sub ShowClipboard()
  159.     Sub ShowMe()
  160.     Sub SubstituteFont(UnavailableFont_Param as string, SubstituteFont_Param as string)
  161.     Function SynonymInfo(Word_Param as string, LanguageID_Param as variant) as WordSynonymInfo
  162.     Sub ToggleKeyboard()
  163.     Event EventTriggered(eventName As String, parameters() As Variant)
  164.     Event DocumentChange()
  165.     Event Quit()
  166.     EventImp EventTriggered(eventName As String, parameters() As Variant) As Variant
  167.         Select Case eventName
  168.         Case "DocumentChange"
  169.           DocumentChange
  170.         Case "Quit"
  171.           Quit
  172.         Else
  173.           EventTriggered( eventName, parameters )
  174.         End Select
  175.     End EventImp
  176. End Class
  177.  
  178. Class WordGlobal
  179. inherits OLEObject
  180.     dim ActiveDocument as WordDocument
  181.     dim ActivePrinter as string
  182.     dim ActiveWindow as WordWindow
  183.     dim AddIns as WordAddIns
  184.     dim AnswerWizard as OLEObject
  185.     dim Application as WordApplication
  186.     dim Assistant as OLEObject
  187.     dim AutoCaptions as WordAutoCaptions
  188.     dim AutoCorrect as WordAutoCorrect
  189.     dim CaptionLabels as WordCaptionLabels
  190.     dim CommandBars as variant
  191.     dim Creator as integer
  192.     dim CustomDictionaries as WordDictionaries
  193.     dim CustomizationContext as OLEObject
  194.     dim Dialogs as WordDialogs
  195.     dim Documents as WordDocuments
  196.     dim FileConverters as WordFileConverters
  197.     dim FontNames as WordFontNames
  198.     dim HangulHanjaDictionaries as WordHangulHanjaConversionDictionaries
  199.     dim KeyBindings as WordKeyBindings
  200.     dim LandscapeFontNames as WordFontNames
  201.     dim Languages as WordLanguages
  202.     dim LanguageSettings as OLEObject
  203.     dim ListGalleries as WordListGalleries
  204.     dim MacroContainer as OLEObject
  205.     dim Name as string
  206.     dim NormalTemplate as WordTemplate
  207.     dim Options as WordOptions
  208.     dim Parent as OLEObject
  209.     dim PortraitFontNames as WordFontNames
  210.     dim PrintPreview as boolean
  211.     dim RecentFiles as WordRecentFiles
  212.     dim Selection as WordSelection
  213.     dim ShowVisualBasicEditor as boolean
  214.     dim StatusBar as string
  215.     dim System as WordSystem
  216.     dim Tasks as WordTasks
  217.     dim Templates as WordTemplates
  218.     dim VBE as VBE
  219.     dim Windows as WordWindows
  220.     dim WordBasic as OLEObject
  221.     Function BuildKeyCode(Arg1_Param as integer, Arg2_Param as variant, Arg3_Param as variant, Arg4_Param as variant) as integer
  222.     Function CentimetersToPoints(Centimeters_Param as single) as single
  223.     Sub ChangeFileOpenDirectory(Path_Param as string)
  224.     Function CheckSpelling(Word_Param as string, CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, MainDictionary_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant) as boolean
  225.     Function CleanString(String_Param as string) as string
  226.     Sub DDEExecute(Channel_Param as integer, Command_Param as string)
  227.     Function DDEInitiate(App_Param as string, Topic_Param as string) as integer
  228.     Sub DDEPoke(Channel_Param as integer, Item_Param as string, Data_Param as string)
  229.     Function DDERequest(Channel_Param as integer, Item_Param as string) as string
  230.     Sub DDETerminate(Channel_Param as integer)
  231.     Sub DDETerminateAll()
  232.     Function FindKey(KeyCode_Param as integer, KeyCode2_Param as variant) as WordKeyBinding
  233.     Function GetSpellingSuggestions(Word_Param as string, CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, MainDictionary_Param as variant, SuggestionMode_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant) as WordSpellingSuggestions
  234.     Sub Help(HelpType_Param as variant)
  235.     Function InchesToPoints(Inches_Param as single) as single
  236.     Function IsObjectValid(Object_Param as OLEObject) as boolean
  237.     Function KeysBoundTo(KeyCategory_Param as integer, Command_Param as string, CommandParameter_Param as variant) as WordKeysBoundTo
  238.     Function KeyString(KeyCode_Param as integer, KeyCode2_Param as variant) as string
  239.     Function LinesToPoints(Lines_Param as single) as single
  240.     Function MillimetersToPoints(Millimeters_Param as single) as single
  241.     Function NewWindow() as WordWindow
  242.     Function PicasToPoints(Picas_Param as single) as single
  243.     Function PixelsToPoints(Pixels_Param as single, fVertical_Param as variant) as single
  244.     Function PointsToCentimeters(Points_Param as single) as single
  245.     Function PointsToInches(Points_Param as single) as single
  246.     Function PointsToLines(Points_Param as single) as single
  247.     Function PointsToMillimeters(Points_Param as single) as single
  248.     Function PointsToPicas(Points_Param as single) as single
  249.     Function PointsToPixels(Points_Param as single, fVertical_Param as variant) as single
  250.     Function Repeat(Times_Param as variant) as boolean
  251.     Function SynonymInfo(Word_Param as string, LanguageID_Param as variant) as WordSynonymInfo
  252. End Class
  253.  
  254. Class WordFontNames
  255. inherits OLEObject
  256.     dim Application as WordApplication
  257.     dim Count as integer
  258.     dim Creator as integer
  259.     dim Parent as OLEObject
  260.     dim _NewEnum as OLEObject
  261.     Function Item(Index_Param as integer) as string
  262. End Class
  263.  
  264. Class WordLanguages
  265. inherits OLEObject
  266.     dim Application as WordApplication
  267.     dim Count as integer
  268.     dim Creator as integer
  269.     dim Parent as OLEObject
  270.     dim _NewEnum as OLEObject
  271.     Function Item(Index_Param as variant) as WordLanguage
  272. End Class
  273.  
  274. Class WordLanguage
  275. inherits OLEObject
  276.     dim ActiveGrammarDictionary as WordDictionary
  277.     dim ActiveHyphenationDictionary as WordDictionary
  278.     dim ActiveSpellingDictionary as WordDictionary
  279.     dim ActiveThesaurusDictionary as WordDictionary
  280.     dim Application as WordApplication
  281.     dim Creator as integer
  282.     dim DefaultWritingStyle as string
  283.     dim ID as integer
  284.     dim Name as string
  285.     dim NameLocal as string
  286.     dim Parent as OLEObject
  287.     dim SpellingDictionaryType as integer
  288.     dim WritingStyleList as variant
  289. End Class
  290.  
  291. Class WordDocuments
  292. inherits OLEObject
  293.     dim Application as WordApplication
  294.     dim Count as integer
  295.     dim Creator as integer
  296.     dim Parent as OLEObject
  297.     dim _NewEnum as OLEObject
  298.     Function Add(Template_Param as variant, NewTemplate_Param as variant, DocumentType_Param as variant, Visible_Param as variant) as WordDocument
  299.     Function AddOld(Template_Param as variant, NewTemplate_Param as variant) as WordDocument
  300.     Sub Close(SaveChanges_Param as variant, OriginalFormat_Param as variant, RouteDocument_Param as variant)
  301.     Function Item(Index_Param as variant) as WordDocument
  302.     Function Open(FileName_Param as variant, ConfirmConversions_Param as variant, ReadOnly_Param as variant, AddToRecentFiles_Param as variant, PasswordDocument_Param as variant, PasswordTemplate_Param as variant, Revert_Param as variant, WritePasswordDocument_Param as variant, WritePasswordTemplate_Param as variant, Format_Param as variant, Encoding_Param as variant, Visible_Param as variant) as WordDocument
  303.     Function OpenOld(FileName_Param as variant, ConfirmConversions_Param as variant, ReadOnly_Param as variant, AddToRecentFiles_Param as variant, PasswordDocument_Param as variant, PasswordTemplate_Param as variant, Revert_Param as variant, WritePasswordDocument_Param as variant, WritePasswordTemplate_Param as variant, Format_Param as variant) as WordDocument
  304.     Sub Save(NoPrompt_Param as variant, OriginalFormat_Param as variant)
  305. End Class
  306.  
  307. Class WordDocument
  308. inherits OLEObject
  309.     dim ActiveTheme as string
  310.     dim ActiveThemeDisplayName as string
  311.     dim ActiveWindow as WordWindow
  312.     dim Application as WordApplication
  313.     dim AttachedTemplate as variant
  314.     dim AutoHyphenation as boolean
  315.     dim Background as WordShape
  316.     dim Bookmarks as WordBookmarks
  317.     dim BuiltInDocumentProperties as OLEObject
  318.     dim Characters as WordCharacters
  319.     dim ClickAndTypeParagraphStyle as variant
  320.     dim CodeName as string
  321.     dim CommandBars as variant
  322.     dim Comments as WordComments
  323.     dim ConsecutiveHyphensLimit as integer
  324.     dim Container as OLEObject
  325.     dim Content as WordRange
  326.     dim Creator as integer
  327.     dim CustomDocumentProperties as OLEObject
  328.     dim DefaultTabStop as single
  329.     dim Email as WordEmail
  330.     dim EmbedTrueTypeFonts as boolean
  331.     dim Endnotes as WordEndnotes
  332.     dim Envelope as WordEnvelope
  333.     dim FarEastLineBreakLanguage as integer
  334.     dim FarEastLineBreakLevel as integer
  335.     dim Fields as WordFields
  336.     dim Footnotes as WordFootnotes
  337.     dim FormFields as WordFormFields
  338.     dim FormsDesign as boolean
  339.     dim Frames as WordFrames
  340.     dim Frameset as WordFrameset
  341.     dim FullName as string
  342.     dim GrammarChecked as boolean
  343.     dim GrammaticalErrors as WordProofreadingErrors
  344.     dim GridDistanceHorizontal as single
  345.     dim GridDistanceVertical as single
  346.     dim GridOriginFromMargin as boolean
  347.     dim GridOriginHorizontal as single
  348.     dim GridOriginVertical as single
  349.     dim GridSpaceBetweenHorizontalLines as integer
  350.     dim GridSpaceBetweenVerticalLines as integer
  351.     dim HasMailer as boolean
  352.     dim HasPassword as boolean
  353.     dim HasRoutingSlip as boolean
  354.     dim HTMLProject as OLEObject
  355.     dim Hyperlinks as WordHyperlinks
  356.     dim HyphenateCaps as boolean
  357.     dim HyphenationZone as integer
  358.     dim Indexes as WordIndexes
  359.     dim InlineShapes as WordInlineShapes
  360.     dim IsMasterDocument as boolean
  361.     dim IsSubdocument as boolean
  362.     dim JustificationMode as integer
  363.     dim KerningByAlgorithm as boolean
  364.     dim Kind as integer
  365.     dim LanguageDetected as boolean
  366.     dim ListParagraphs as WordListParagraphs
  367.     dim Lists as WordLists
  368.     dim ListTemplates as WordListTemplates
  369.     dim Mailer as WordMailer
  370.     dim MailMerge as WordMailMerge
  371.     dim Name as string
  372.     dim NoLineBreakAfter as string
  373.     dim NoLineBreakBefore as string
  374.     dim OpenEncoding as integer
  375.     dim OptimizeForWord97 as boolean
  376.     dim PageSetup as WordPageSetup
  377.     dim Paragraphs as WordParagraphs
  378.     dim Parent as OLEObject
  379.     dim Password as string
  380.     dim Path as string
  381.     dim PrintFormsData as boolean
  382.     dim PrintFractionalWidths as boolean
  383.     dim PrintPostScriptOverText as boolean
  384.     dim PrintRevisions as boolean
  385.     dim ProtectionType as integer
  386.     dim ReadabilityStatistics as WordReadabilityStatistics
  387.     dim ReadOnly as boolean
  388.     dim ReadOnlyRecommended as boolean
  389.     dim Revisions as WordRevisions
  390.     dim Routed as boolean
  391.     dim RoutingSlip as WordRoutingSlip
  392.     dim Saved as boolean
  393.     dim SaveEncoding as integer
  394.     dim SaveFormat as integer
  395.     dim SaveFormsData as boolean
  396.     dim SaveSubsetFonts as boolean
  397.     dim Scripts as OLEObject
  398.     dim Sections as WordSections
  399.     dim Sentences as WordSentences
  400.     dim Shapes as WordShapes
  401.     dim ShowGrammaticalErrors as boolean
  402.     dim ShowRevisions as boolean
  403.     dim ShowSpellingErrors as boolean
  404.     dim ShowSummary as boolean
  405.     dim SnapToGrid as boolean
  406.     dim SnapToShapes as boolean
  407.     dim SpellingChecked as boolean
  408.     dim SpellingErrors as WordProofreadingErrors
  409.     dim StoryRanges as WordStoryRanges
  410.     dim Styles as WordStyles
  411.     dim Subdocuments as WordSubdocuments
  412.     dim SummaryLength as integer
  413.     dim SummaryViewMode as integer
  414.     dim Tables as WordTables
  415.     dim TablesOfAuthorities as WordTablesOfAuthorities
  416.     dim TablesOfAuthoritiesCategories as WordTablesOfAuthoritiesCategories
  417.     dim TablesOfContents as WordTablesOfContents
  418.     dim TablesOfFigures as WordTablesOfFigures
  419.     dim TrackRevisions as boolean
  420.     dim Type as integer
  421.     dim UpdateStylesOnOpen as boolean
  422.     dim UserControl as boolean
  423.     dim Variables as WordVariables
  424.     dim VBASigned as boolean
  425.     dim VBProject as variant
  426.     dim Versions as WordVersions
  427.     dim WebOptions as WordWebOptions
  428.     dim Windows as WordWindows
  429.     dim Words as WordWords
  430.     dim WritePassword as string
  431.     dim WriteReserved as boolean
  432.     dim _CodeName as string
  433.     Sub AcceptAllRevisions()
  434.     Sub Activate()
  435.     Function ActiveWritingStyle(LanguageID_Param as variant) as string
  436.     Sub AddToFavorites()
  437.     Sub ApplyTheme(Name_Param as string)
  438.     Sub AutoFormat()
  439.     Function AutoSummarize(Length_Param as variant, Mode_Param as variant, UpdateProperties_Param as variant) as WordRange
  440.     Sub CheckConsistency()
  441.     Sub CheckGrammar()
  442.     Sub CheckSpelling(CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, AlwaysSuggest_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant)
  443.     Sub Close(SaveChanges_Param as variant, OriginalFormat_Param as variant, RouteDocument_Param as variant)
  444.     Sub ClosePrintPreview()
  445.     Sub Compare(Name_Param as string)
  446.     Function Compatibility(Type_Param as integer) as boolean
  447.     Function ComputeStatistics(Statistic_Param as integer, IncludeFootnotesAndEndnotes_Param as variant) as integer
  448.     Sub ConvertNumbersToText(NumberType_Param as variant)
  449.     Sub CopyStylesFromTemplate(Template_Param as string)
  450.     Function CountNumberedItems(NumberType_Param as variant, Level_Param as variant) as integer
  451.     Function CreateLetterContent(DateFormat_Param as string, IncludeHeaderFooter_Param as boolean, PageDesign_Param as string, LetterStyle_Param as integer, Letterhead_Param as boolean, LetterheadLocation_Param as integer, LetterheadSize_Param as single, RecipientName_Param as string, RecipientAddress_Param as string, Salutation_Param as string, SalutationType_Param as integer, RecipientReference_Param as string, MailingInstructions_Param as string, AttentionLine_Param as string, Subject_Param as string, CCList_Param as string, ReturnAddress_Param as string, SenderName_Param as string, Closing_Param as string, SenderCompany_Param as string, SenderJobTitle_Param as string, SenderInitials_Param as string, EnclosureNumber_Param as integer, InfoBlock_Param as variant, RecipientCode_Param as variant, RecipientGender_Param as variant, ReturnAddressShortForm_Param as variant, SenderCity_Param as variant, SenderCode_Param as variant, SenderGender_Param as variant, SenderReference_Param as variant) as WordLetterContent
  452.     Sub DataForm()
  453.     Sub DetectLanguage()
  454.     Sub EditionOptions(Type_Param as integer, Option_Param as integer, Name_Param as string, Format_Param as variant)
  455.     Sub FitToPages()
  456.     Sub FollowHyperlink(Address_Param as variant, SubAddress_Param as variant, NewWindow_Param as variant, AddHistory_Param as variant, ExtraInfo_Param as variant, Method_Param as variant, HeaderInfo_Param as variant)
  457.     Sub ForwardMailer()
  458.     Function GetCrossReferenceItems(ReferenceType_Param as variant) as variant
  459.     Function GetLetterContent() as WordLetterContent
  460.     Function GoTo_(What_Param as variant, Which_Param as variant, Count_Param as variant, Name_Param as variant) as WordRange
  461.     Sub MakeCompatibilityDefault()
  462.     Sub ManualHyphenation()
  463.     Sub Merge(FileName_Param as string)
  464.     Sub Post()
  465.     Sub PresentIt()
  466.     Sub PrintOut(Background_Param as variant, Append_Param as variant, Range_Param as variant, OutputFileName_Param as variant, From_Param as variant, To_Param as variant, Item_Param as variant, Copies_Param as variant, Pages_Param as variant, PageType_Param as variant, PrintToFile_Param as variant, Collate_Param as variant, ActivePrinterMacGX_Param as variant, ManualDuplexPrint_Param as variant, PrintZoomColumn_Param as variant, PrintZoomRow_Param as variant, PrintZoomPaperWidth_Param as variant, PrintZoomPaperHeight_Param as variant)
  467.     Sub PrintOutOld(Background_Param as variant, Append_Param as variant, Range_Param as variant, OutputFileName_Param as variant, From_Param as variant, To_Param as variant, Item_Param as variant, Copies_Param as variant, Pages_Param as variant, PageType_Param as variant, PrintToFile_Param as variant, Collate_Param as variant, ActivePrinterMacGX_Param as variant, ManualDuplexPrint_Param as variant)
  468.     Sub PrintPreview()
  469.     Sub Protect(Type_Param as integer, NoReset_Param as variant, Password_Param as variant)
  470.     Function Range(Start_Param as variant, End_Param as variant) as WordRange
  471.     Function Redo(Times_Param as variant) as boolean
  472.     Sub RejectAllRevisions()
  473.     Sub Reload()
  474.     Sub ReloadAs(Encoding_Param as integer)
  475.     Sub RemoveNumbers(NumberType_Param as variant)
  476.     Sub RemoveTheme()
  477.     Sub Repaginate()
  478.     Sub Reply()
  479.     Sub ReplyAll()
  480.     Sub Route()
  481.     Sub RunAutoMacro(Which_Param as integer)
  482.     Sub RunLetterWizard(LetterContent_Param as variant, WizardMode_Param as variant)
  483.     Sub Save()
  484.     Sub SaveAs(FileName_Param as variant, FileFormat_Param as variant, LockComments_Param as variant, Password_Param as variant, AddToRecentFiles_Param as variant, WritePassword_Param as variant, ReadOnlyRecommended_Param as variant, EmbedTrueTypeFonts_Param as variant, SaveNativePictureFormat_Param as variant, SaveFormsData_Param as variant, SaveAsAOCELetter_Param as variant)
  485.     Sub sblt(s_Param as string)
  486.     Sub Select_()
  487.     Sub SendFax(Address_Param as string, Subject_Param as variant)
  488.     Sub SendMail()
  489.     Sub SendMailer(FileFormat_Param as variant, Priority_Param as variant)
  490.     Sub SetLetterContent(LetterContent_Param as variant)
  491.     Sub ToggleFormsDesign()
  492.     Function Undo(Times_Param as variant) as boolean
  493.     Sub UndoClear()
  494.     Sub Unprotect(Password_Param as variant)
  495.     Sub UpdateStyles()
  496.     Sub UpdateSummaryProperties()
  497.     Sub ViewCode()
  498.     Sub ViewPropertyBrowser()
  499.     Sub WebPagePreview()
  500. End Class
  501.  
  502. Class WordTemplate
  503. inherits OLEObject
  504.     dim Application as WordApplication
  505.     dim AutoTextEntries as WordAutoTextEntries
  506.     dim BuiltInDocumentProperties as OLEObject
  507.     dim Creator as integer
  508.     dim CustomDocumentProperties as OLEObject
  509.     dim FarEastLineBreakLanguage as integer
  510.     dim FarEastLineBreakLevel as integer
  511.     dim FullName as string
  512.     dim JustificationMode as integer
  513.     dim KerningByAlgorithm as boolean
  514.     dim LanguageID as integer
  515.     dim LanguageIDFarEast as integer
  516.     dim ListTemplates as WordListTemplates
  517.     dim Name as string
  518.     dim NoLineBreakAfter as string
  519.     dim NoLineBreakBefore as string
  520.     dim NoProofing as integer
  521.     dim Parent as OLEObject
  522.     dim Path as string
  523.     dim Saved as boolean
  524.     dim Type as integer
  525.     dim VBProject as variant
  526.     Function OpenAsDocument() as WordDocument
  527.     Sub Save()
  528. End Class
  529.  
  530. Class WordTemplates
  531. inherits OLEObject
  532.     dim Application as WordApplication
  533.     dim Count as integer
  534.     dim Creator as integer
  535.     dim Parent as OLEObject
  536.     dim _NewEnum as OLEObject
  537.     Function Item(Index_Param as variant) as WordTemplate
  538. End Class
  539.  
  540. Class WordRoutingSlip
  541. inherits OLEObject
  542.     dim Application as WordApplication
  543.     dim Creator as integer
  544.     dim Delivery as integer
  545.     dim Message as string
  546.     dim Parent as OLEObject
  547.     dim Protect as integer
  548.     dim ReturnWhenDone as boolean
  549.     dim Status as integer
  550.     dim Subject as string
  551.     dim TrackStatus as boolean
  552.     Sub AddRecipient(Recipient_Param as string)
  553.     Function Recipients(Index_Param as variant) as variant
  554.     Sub Reset()
  555. End Class
  556.  
  557. Class WordBookmark
  558. inherits OLEObject
  559.     dim Application as WordApplication
  560.     dim Column as boolean
  561.     dim Creator as integer
  562.     dim Empty as boolean
  563.     dim End_ as integer
  564.     dim Name as string
  565.     dim Parent as OLEObject
  566.     dim Range as WordRange
  567.     dim Start as integer
  568.     dim StoryType as integer
  569.     Function Copy(Name_Param as string) as WordBookmark
  570.     Sub Delete()
  571.     Sub Select_()
  572. End Class
  573.  
  574. Class WordBookmarks
  575. inherits OLEObject
  576.     dim Application as WordApplication
  577.     dim Count as integer
  578.     dim Creator as integer
  579.     dim DefaultSorting as integer
  580.     dim Parent as OLEObject
  581.     dim ShowHidden as boolean
  582.     dim _NewEnum as OLEObject
  583.     Function Add(Name_Param as string, Range_Param as variant) as WordBookmark
  584.     Function Exists(Name_Param as string) as boolean
  585.     Function Item(Index_Param as variant) as WordBookmark
  586. End Class
  587.  
  588. Class WordVariable
  589. inherits OLEObject
  590.     dim Application as WordApplication
  591.     dim Creator as integer
  592.     dim Index as integer
  593.     dim Name as string
  594.     dim Parent as OLEObject
  595.     dim Value as string
  596.     Sub Delete()
  597. End Class
  598.  
  599. Class WordVariables
  600. inherits OLEObject
  601.     dim Application as WordApplication
  602.     dim Count as integer
  603.     dim Creator as integer
  604.     dim Parent as OLEObject
  605.     dim _NewEnum as OLEObject
  606.     Function Add(Name_Param as string, Value_Param as variant) as WordVariable
  607.     Function Item(Index_Param as variant) as WordVariable
  608. End Class
  609.  
  610. Class WordRecentFile
  611. inherits OLEObject
  612.     dim Application as WordApplication
  613.     dim Creator as integer
  614.     dim Index as integer
  615.     dim Name as string
  616.     dim Parent as OLEObject
  617.     dim Path as string
  618.     dim ReadOnly as boolean
  619.     Sub Delete()
  620.     Function Open() as WordDocument
  621. End Class
  622.  
  623. Class WordRecentFiles
  624. inherits OLEObject
  625.     dim Application as WordApplication
  626.     dim Count as integer
  627.     dim Creator as integer
  628.     dim Maximum as integer
  629.     dim Parent as OLEObject
  630.     dim _NewEnum as OLEObject
  631.     Function Add(Document_Param as variant, ReadOnly_Param as variant) as WordRecentFile
  632.     Function Item(Index_Param as integer) as WordRecentFile
  633. End Class
  634.  
  635. Class WordWindow
  636. inherits OLEObject
  637.     dim Active as boolean
  638.     dim ActivePane as WordPane
  639.     dim Application as WordApplication
  640.     dim Caption as string
  641.     dim Creator as integer
  642.     dim DisplayHorizontalScrollBar as boolean
  643.     dim DisplayLeftScrollBar as boolean
  644.     dim DisplayRightRuler as boolean
  645.     dim DisplayRulers as boolean
  646.     dim DisplayScreenTips as boolean
  647.     dim DisplayVerticalRuler as boolean
  648.     dim DisplayVerticalScrollBar as boolean
  649.     dim Document as WordDocument
  650.     dim DocumentMap as boolean
  651.     dim DocumentMapPercentWidth as integer
  652.     dim EnvelopeVisible as boolean
  653.     dim Height as integer
  654.     dim HorizontalPercentScrolled as integer
  655.     dim IMEMode as integer
  656.     dim Index as integer
  657.     dim Left as integer
  658.     dim Next_ as WordWindow
  659.     dim Panes as WordPanes
  660.     dim Parent as OLEObject
  661.     dim Previous as WordWindow
  662.     dim Selection as WordSelection
  663.     dim Split as boolean
  664.     dim SplitVertical as integer
  665.     dim StyleAreaWidth as single
  666.     dim Top as integer
  667.     dim Type as integer
  668.     dim UsableHeight as integer
  669.     dim UsableWidth as integer
  670.     dim VerticalPercentScrolled as integer
  671.     dim View as WordView
  672.     dim Visible as boolean
  673.     dim Width as integer
  674.     dim WindowNumber as integer
  675.     dim WindowState as integer
  676.     Sub Activate()
  677.     Sub Close(SaveChanges_Param as variant, RouteDocument_Param as variant)
  678.     Sub GetPoint(byref ScreenPixelsLeft_Param as integer, byref ScreenPixelsTop_Param as integer, byref ScreenPixelsWidth_Param as integer, byref ScreenPixelsHeight_Param as integer, obj_Param as OLEObject)
  679.     Sub LargeScroll(Down_Param as variant, Up_Param as variant, ToRight_Param as variant, ToLeft_Param as variant)
  680.     Function NewWindow() as WordWindow
  681.     Sub PageScroll(Down_Param as variant, Up_Param as variant)
  682.     Sub PrintOut(Background_Param as variant, Append_Param as variant, Range_Param as variant, OutputFileName_Param as variant, From_Param as variant, To_Param as variant, Item_Param as variant, Copies_Param as variant, Pages_Param as variant, PageType_Param as variant, PrintToFile_Param as variant, Collate_Param as variant, ActivePrinterMacGX_Param as variant, ManualDuplexPrint_Param as variant, PrintZoomColumn_Param as variant, PrintZoomRow_Param as variant, PrintZoomPaperWidth_Param as variant, PrintZoomPaperHeight_Param as variant)
  683.     Sub PrintOutOld(Background_Param as variant, Append_Param as variant, Range_Param as variant, OutputFileName_Param as variant, From_Param as variant, To_Param as variant, Item_Param as variant, Copies_Param as variant, Pages_Param as variant, PageType_Param as variant, PrintToFile_Param as variant, Collate_Param as variant, ActivePrinterMacGX_Param as variant, ManualDuplexPrint_Param as variant)
  684.     Function RangeFromPoint(x_Param as integer, y_Param as integer) as OLEObject
  685.     Sub ScrollIntoView(obj_Param as OLEObject, Start_Param as variant)
  686.     Sub SetFocus()
  687.     Sub SmallScroll(Down_Param as variant, Up_Param as variant, ToRight_Param as variant, ToLeft_Param as variant)
  688. End Class
  689.  
  690. Class WordWindows
  691. inherits OLEObject
  692.     dim Application as WordApplication
  693.     dim Count as integer
  694.     dim Creator as integer
  695.     dim Parent as OLEObject
  696.     dim _NewEnum as OLEObject
  697.     Function Add(Window_Param as variant) as WordWindow
  698.     Sub Arrange(ArrangeStyle_Param as variant)
  699.     Function Item(Index_Param as variant) as WordWindow
  700. End Class
  701.  
  702. Class WordPane
  703. inherits OLEObject
  704.     dim Application as WordApplication
  705.     dim BrowseToWindow as boolean
  706.     dim BrowseWidth as integer
  707.     dim Creator as integer
  708.     dim DisplayRulers as boolean
  709.     dim DisplayVerticalRuler as boolean
  710.     dim Document as WordDocument
  711.     dim Frameset as WordFrameset
  712.     dim HorizontalPercentScrolled as integer
  713.     dim Index as integer
  714.     dim MinimumFontSize as integer
  715.     dim Next_ as WordPane
  716.     dim Parent as OLEObject
  717.     dim Previous as WordPane
  718.     dim Selection as WordSelection
  719.     dim VerticalPercentScrolled as integer
  720.     dim View as WordView
  721.     dim Zooms as WordZooms
  722.     Sub Activate()
  723.     Sub AutoScroll(Velocity_Param as integer)
  724.     Sub Close()
  725.     Sub LargeScroll(Down_Param as variant, Up_Param as variant, ToRight_Param as variant, ToLeft_Param as variant)
  726.     Sub NewFrameset()
  727.     Sub PageScroll(Down_Param as variant, Up_Param as variant)
  728.     Sub SmallScroll(Down_Param as variant, Up_Param as variant, ToRight_Param as variant, ToLeft_Param as variant)
  729.     Sub TOCInFrameset()
  730. End Class
  731.  
  732. Class WordPanes
  733. inherits OLEObject
  734.     dim Application as WordApplication
  735.     dim Count as integer
  736.     dim Creator as integer
  737.     dim Parent as OLEObject
  738.     dim _NewEnum as OLEObject
  739.     Function Add(SplitVertical_Param as variant) as WordPane
  740.     Function Item(Index_Param as integer) as WordPane
  741. End Class
  742.  
  743. Class WordRange
  744. inherits OLEObject
  745.     dim Application as WordApplication
  746.     dim Bold as integer
  747.     dim BoldBi as integer
  748.     dim BookmarkID as integer
  749.     dim Bookmarks as WordBookmarks
  750.     dim Borders as WordBorders
  751.     dim CanEdit as integer
  752.     dim CanPaste as integer
  753.     dim Case_ as integer
  754.     dim Cells as WordCells
  755.     dim Characters as WordCharacters
  756.     dim CharacterWidth as integer
  757.     dim Columns as WordColumns
  758.     dim CombineCharacters as boolean
  759.     dim Comments as WordComments
  760.     dim Creator as integer
  761.     dim DisableCharacterSpaceGrid as boolean
  762.     dim Duplicate as WordRange
  763.     dim EmphasisMark as integer
  764.     dim End_ as integer
  765.     dim Endnotes as WordEndnotes
  766.     dim Fields as WordFields
  767.     dim Find as WordFind
  768.     dim FitTextWidth as single
  769.     dim Font as WordFont
  770.     dim Footnotes as WordFootnotes
  771.     dim FormattedText as WordRange
  772.     dim FormFields as WordFormFields
  773.     dim Frames as WordFrames
  774.     dim GrammarChecked as boolean
  775.     dim GrammaticalErrors as WordProofreadingErrors
  776.     dim HighlightColorIndex as integer
  777.     dim HorizontalInVertical as integer
  778.     dim Hyperlinks as WordHyperlinks
  779.     dim ID as string
  780.     dim InlineShapes as WordInlineShapes
  781.     dim IsEndOfRowMark as boolean
  782.     dim Italic as integer
  783.     dim ItalicBi as integer
  784.     dim Kana as integer
  785.     dim LanguageDetected as boolean
  786.     dim LanguageID as integer
  787.     dim LanguageIDFarEast as integer
  788.     dim LanguageIDOther as integer
  789.     dim ListFormat as WordListFormat
  790.     dim ListParagraphs as WordListParagraphs
  791.     dim NextStoryRange as WordRange
  792.     dim NoProofing as integer
  793.     dim Orientation as integer
  794.     dim PageSetup as WordPageSetup
  795.     dim ParagraphFormat as WordParagraphFormat
  796.     dim Paragraphs as WordParagraphs
  797.     dim Parent as OLEObject
  798.     dim PreviousBookmarkID as integer
  799.     dim ReadabilityStatistics as WordReadabilityStatistics
  800.     dim Revisions as WordRevisions
  801.     dim Rows as WordRows
  802.     dim Scripts as OLEObject
  803.     dim Sections as WordSections
  804.     dim Sentences as WordSentences
  805.     dim Shading as WordShading
  806.     dim ShapeRange as WordShapeRange
  807.     dim SpellingChecked as boolean
  808.     dim SpellingErrors as WordProofreadingErrors
  809.     dim Start as integer
  810.     dim StoryLength as integer
  811.     dim StoryType as integer
  812.     dim Style as variant
  813.     dim Subdocuments as WordSubdocuments
  814.     dim SynonymInfo as WordSynonymInfo
  815.     dim Tables as WordTables
  816.     dim Text as string
  817.     dim TextRetrievalMode as WordTextRetrievalMode
  818.     dim TopLevelTables as WordTables
  819.     dim TwoLinesInOne as integer
  820.     dim Underline as integer
  821.     dim Words as WordWords
  822.     Sub AutoFormat()
  823.     Function Calculate() as single
  824.     Sub CheckGrammar()
  825.     Sub CheckSpelling(CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, AlwaysSuggest_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant)
  826.     Sub CheckSynonyms()
  827.     Sub Collapse(Direction_Param as variant)
  828.     Function ComputeStatistics(Statistic_Param as integer) as integer
  829.     Sub ConvertHangulAndHanja(ConversionsMode_Param as variant, FastConversion_Param as variant, CheckHangulEnding_Param as variant, EnableRecentOrdering_Param as variant, CustomDictionary_Param as variant)
  830.     Function ConvertToTable(Separator_Param as variant, NumRows_Param as variant, NumColumns_Param as variant, InitialColumnWidth_Param as variant, Format_Param as variant, ApplyBorders_Param as variant, ApplyShading_Param as variant, ApplyFont_Param as variant, ApplyColor_Param as variant, ApplyHeadingRows_Param as variant, ApplyLastRow_Param as variant, ApplyFirstColumn_Param as variant, ApplyLastColumn_Param as variant, AutoFit_Param as variant, AutoFitBehavior_Param as variant, DefaultTableBehavior_Param as variant) as WordTable
  831.     Function ConvertToTableOld(Separator_Param as variant, NumRows_Param as variant, NumColumns_Param as variant, InitialColumnWidth_Param as variant, Format_Param as variant, ApplyBorders_Param as variant, ApplyShading_Param as variant, ApplyFont_Param as variant, ApplyColor_Param as variant, ApplyHeadingRows_Param as variant, ApplyLastRow_Param as variant, ApplyFirstColumn_Param as variant, ApplyLastColumn_Param as variant, AutoFit_Param as variant) as WordTable
  832.     Sub Copy()
  833.     Sub CopyAsPicture()
  834.     Sub CreatePublisher(Edition_Param as variant, ContainsPICT_Param as variant, ContainsRTF_Param as variant, ContainsText_Param as variant)
  835.     Sub Cut()
  836.     Function Delete(Unit_Param as variant, Count_Param as variant) as integer
  837.     Sub DetectLanguage()
  838.     Function EndOf(Unit_Param as variant, Extend_Param as variant) as integer
  839.     Function Expand(Unit_Param as variant) as integer
  840.     Function GetSpellingSuggestions(CustomDictionary_Param as variant, IgnoreUppercase_Param as variant, MainDictionary_Param as variant, SuggestionMode_Param as variant, CustomDictionary2_Param as variant, CustomDictionary3_Param as variant, CustomDictionary4_Param as variant, CustomDictionary5_Param as variant, CustomDictionary6_Param as variant, CustomDictionary7_Param as variant, CustomDictionary8_Param as variant, CustomDictionary9_Param as variant, CustomDictionary10_Param as variant) as WordSpellingSuggestions
  841.     Function GoTo_(What_Param as variant, Which_Param as variant, Count_Param as variant, Name_Param as variant) as WordRange
  842.     Function GoToNext(What_Param as integer) as WordRange
  843.     Function GoToPrevious(What_Param as integer) as WordRange
  844.     Function Information(Type_Param as integer) as variant
  845.     Function InRange(Range_Param as WordRange) as boolean
  846.     Sub InsertAfter(Text_Param as string)
  847.     Sub InsertAutoText()
  848.     Sub InsertBefore(Text_Param as string)
  849.     Sub InsertBreak(Type_Param as variant)
  850.     Sub InsertCaption(Label_Param as variant, Title_Param as variant, TitleAutoText_Param as variant, Position_Param as variant)
  851.     Sub InsertCrossReference(ReferenceType_Param as variant, ReferenceKind_Param as integer, ReferenceItem_Param as variant, InsertAsHyperlink_Param as variant, IncludePosition_Param as variant)
  852.     Sub InsertDatabase(Format_Param as variant, Style_Param as variant, LinkToSource_Param as variant, Connection_Param as variant, SQLStatement_Param as variant, SQLStatement1_Param as variant, PasswordDocument_Param as variant, PasswordTemplate_Param as variant, WritePasswordDocument_Param as variant, WritePasswordTemplate_Param as variant, DataSource_Param as variant, From_Param as variant, To_Param as variant, IncludeFields_Param as variant)
  853.     Sub InsertDateTime(DateTimeFormat_Param as variant, InsertAsField_Param as variant, InsertAsFullWidth_Param as variant, DateLanguage_Param as variant, CalendarType_Param as variant)
  854.     Sub InsertDateTimeOld(DateTimeFormat_Param as variant, InsertAsField_Param as variant, InsertAsFullWidth_Param as variant)
  855.     Sub InsertFile(FileName_Param as string, Range_Param as variant, ConfirmConversions_Param as variant, Link_Param as variant, Attachment_Param as variant)
  856.     Sub InsertParagraph()
  857.     Sub InsertParagraphAfter()
  858.     Sub InsertParagraphBefore()
  859.     Sub InsertSymbol(CharacterNumber_Param as integer, Font_Param as variant, Unicode_Param as variant, Bias_Param as variant)
  860.     Function InStory(Range_Param as WordRange) as boolean
  861.     Function IsEqual(Range_Param as WordRange) as boolean
  862.     Sub LookupNameProperties()
  863.     Sub ModifyEnclosure(Style_Param as variant, Symbol_Param as variant, EnclosedText_Param as variant)
  864.     Function Move(Unit_Param as variant, Count_Param as variant) as integer
  865.     Function MoveEnd(Unit_Param as variant, Count_Param as variant) as integer
  866.     Function MoveEndUntil(Cset_Param as variant, Count_Param as variant) as integer
  867.     Function MoveEndWhile(Cset_Param as variant, Count_Param as variant) as integer
  868.     Function MoveStart(Unit_Param as variant, Count_Param as variant) as integer
  869.     Function MoveStartUntil(Cset_Param as variant, Count_Param as variant) as integer
  870.     Function MoveStartWhile(Cset_Param as variant, Count_Param as variant) as integer
  871.     Function MoveUntil(Cset_Param as variant, Count_Param as variant) as integer
  872.     Function MoveWhile(Cset_Param as variant, Count_Param as variant) as integer
  873.     Function Next_(Unit_Param as variant, Count_Param as variant) as WordRange
  874.     Sub NextSubdocument()
  875.     Sub Paste()
  876.     Sub PasteAsNestedTable()
  877.     Sub PasteSpecial(IconIndex_Param as variant, Link_Param as variant, Placement_Param as variant, DisplayAsIcon_Param as variant, DataType_Param as variant, IconFileName_Param as variant, IconLabel_Param as variant)
  878.     Sub PhoneticGuide(Text_Param as string, Alignment_Param as integer, Raise_Param as integer, FontSize_Param as integer, FontName_Param as string)
  879.     Function Previous(Unit_Param as variant, Count_Param as variant) as WordRange
  880.     Sub PreviousSubdocument()
  881.     Sub Relocate(Direction_Param as integer)
  882.     Sub Select_()
  883.     Sub SetRange(Start_Param as integer, End_Param as integer)
  884.     Sub Sort(ExcludeHeader_Param as variant, FieldNumber_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, FieldNumber2_Param as variant, SortFieldType2_Param as variant, SortOrder2_Param as variant, FieldNumber3_Param as variant, SortFieldType3_Param as variant, SortOrder3_Param as variant, SortColumn_Param as variant, Separator_Param as variant, CaseSensitive_Param as variant, BidiSort_Param as variant, IgnoreThe_Param as variant, IgnoreKashida_Param as variant, IgnoreDiacritics_Param as variant, IgnoreHe_Param as variant, LanguageID_Param as variant)
  885.     Sub SortAscending()
  886.     Sub SortDescending()
  887.     Sub SortOld(ExcludeHeader_Param as variant, FieldNumber_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, FieldNumber2_Param as variant, SortFieldType2_Param as variant, SortOrder2_Param as variant, FieldNumber3_Param as variant, SortFieldType3_Param as variant, SortOrder3_Param as variant, SortColumn_Param as variant, Separator_Param as variant, CaseSensitive_Param as variant, LanguageID_Param as variant)
  888.     Function StartOf(Unit_Param as variant, Extend_Param as variant) as integer
  889.     Sub SubscribeTo(Edition_Param as string, Format_Param as variant)
  890.     Sub TCSCConverter(WdTCSCConverterDirection_Param as integer, CommonTerms_Param as boolean, UseVariants_Param as boolean)
  891.     Sub WholeStory()
  892. End Class
  893.  
  894. Class WordListFormat
  895. inherits OLEObject
  896.     dim Application as WordApplication
  897.     dim Creator as integer
  898.     dim List as WordList
  899.     dim ListLevelNumber as integer
  900.     dim ListString as string
  901.     dim ListTemplate as WordListTemplate
  902.     dim ListType as integer
  903.     dim ListValue as integer
  904.     dim Parent as OLEObject
  905.     dim SingleList as boolean
  906.     dim SingleListTemplate as boolean
  907.     Sub ApplyBulletDefault(DefaultListBehavior_Param as variant)
  908.     Sub ApplyBulletDefaultOld()
  909.     Sub ApplyListTemplate(ListTemplate_Param as WordListTemplate, ContinuePreviousList_Param as variant, ApplyTo_Param as variant, DefaultListBehavior_Param as variant)
  910.     Sub ApplyListTemplateOld(ListTemplate_Param as WordListTemplate, ContinuePreviousList_Param as variant, ApplyTo_Param as variant)
  911.     Sub ApplyNumberDefault(DefaultListBehavior_Param as variant)
  912.     Sub ApplyNumberDefaultOld()
  913.     Sub ApplyOutlineNumberDefault(DefaultListBehavior_Param as variant)
  914.     Sub ApplyOutlineNumberDefaultOld()
  915.     Function CanContinuePreviousList(ListTemplate_Param as WordListTemplate) as integer
  916.     Sub ConvertNumbersToText(NumberType_Param as variant)
  917.     Function CountNumberedItems(NumberType_Param as variant, Level_Param as variant) as integer
  918.     Sub ListIndent()
  919.     Sub ListOutdent()
  920.     Sub RemoveNumbers(NumberType_Param as variant)
  921. End Class
  922.  
  923. Class WordFind
  924. inherits OLEObject
  925.     dim Application as WordApplication
  926.     dim CorrectHangulEndings as boolean
  927.     dim Creator as integer
  928.     dim Font as WordFont
  929.     dim Format as boolean
  930.     dim Forward as boolean
  931.     dim Found as boolean
  932.     dim Frame as WordFrame
  933.     dim Highlight as integer
  934.     dim LanguageID as integer
  935.     dim LanguageIDFarEast as integer
  936.     dim LanguageIDOther as integer
  937.     dim MatchAlefHamza as boolean
  938.     dim MatchAllWordForms as boolean
  939.     dim MatchByte as boolean
  940.     dim MatchCase as boolean
  941.     dim MatchControl as boolean
  942.     dim MatchDiacritics as boolean
  943.     dim MatchFuzzy as boolean
  944.     dim MatchKashida as boolean
  945.     dim MatchSoundsLike as boolean
  946.     dim MatchWholeWord as boolean
  947.     dim MatchWildcards as boolean
  948.     dim NoProofing as integer
  949.     dim ParagraphFormat as WordParagraphFormat
  950.     dim Parent as OLEObject
  951.     dim Replacement as WordReplacement
  952.     dim Style as variant
  953.     dim Text as string
  954.     dim Wrap as integer
  955.     Sub ClearAllFuzzyOptions()
  956.     Sub ClearFormatting()
  957.     Function Execute(FindText_Param as variant, MatchCase_Param as variant, MatchWholeWord_Param as variant, MatchWildcards_Param as variant, MatchSoundsLike_Param as variant, MatchAllWordForms_Param as variant, Forward_Param as variant, Wrap_Param as variant, Format_Param as variant, ReplaceWith_Param as variant, Replace_Param as variant, MatchKashida_Param as variant, MatchDiacritics_Param as variant, MatchAlefHamza_Param as variant, MatchControl_Param as variant) as boolean
  958.     Function ExecuteOld(FindText_Param as variant, MatchCase_Param as variant, MatchWholeWord_Param as variant, MatchWildcards_Param as variant, MatchSoundsLike_Param as variant, MatchAllWordForms_Param as variant, Forward_Param as variant, Wrap_Param as variant, Format_Param as variant, ReplaceWith_Param as variant, Replace_Param as variant) as boolean
  959.     Sub SetAllFuzzyOptions()
  960. End Class
  961.  
  962. Class WordReplacement
  963. inherits OLEObject
  964.     dim Application as WordApplication
  965.     dim Creator as integer
  966.     dim Font as WordFont
  967.     dim Frame as WordFrame
  968.     dim Highlight as integer
  969.     dim LanguageID as integer
  970.     dim LanguageIDFarEast as integer
  971.     dim NoProofing as integer
  972.     dim ParagraphFormat as WordParagraphFormat
  973.     dim Parent as OLEObject
  974.     dim Style as variant
  975.     dim Text as string
  976.     Sub ClearFormatting()
  977. End Class
  978.  
  979. Class WordCharacters
  980. inherits OLEObject
  981.     dim Application as WordApplication
  982.     dim Count as integer
  983.     dim Creator as integer
  984.     dim First as WordRange
  985.     dim Last as WordRange
  986.     dim Parent as OLEObject
  987.     dim _NewEnum as OLEObject
  988.     Function Item(Index_Param as integer) as WordRange
  989. End Class
  990.  
  991. Class WordWords
  992. inherits OLEObject
  993.     dim Application as WordApplication
  994.     dim Count as integer
  995.     dim Creator as integer
  996.     dim First as WordRange
  997.     dim Last as WordRange
  998.     dim Parent as OLEObject
  999.     dim _NewEnum as OLEObject
  1000.     Function Item(Index_Param as integer) as WordRange
  1001. End Class
  1002.  
  1003. Class WordSentences
  1004. inherits OLEObject
  1005.     dim Application as WordApplication
  1006.     dim Count as integer
  1007.     dim Creator as integer
  1008.     dim First as WordRange
  1009.     dim Last as WordRange
  1010.     dim Parent as OLEObject
  1011.     dim _NewEnum as OLEObject
  1012.     Function Item(Index_Param as integer) as WordRange
  1013. End Class
  1014.  
  1015. Class WordSections
  1016. inherits OLEObject
  1017.     dim Application as WordApplication
  1018.     dim Count as integer
  1019.     dim Creator as integer
  1020.     dim First as WordSection
  1021.     dim Last as WordSection
  1022.     dim PageSetup as WordPageSetup
  1023.     dim Parent as OLEObject
  1024.     dim _NewEnum as OLEObject
  1025.     Function Add(Range_Param as variant, Start_Param as variant) as WordSection
  1026.     Function Item(Index_Param as integer) as WordSection
  1027. End Class
  1028.  
  1029. Class WordSection
  1030. inherits OLEObject
  1031.     dim Application as WordApplication
  1032.     dim Borders as WordBorders
  1033.     dim Creator as integer
  1034.     dim Footers as WordHeadersFooters
  1035.     dim Headers as WordHeadersFooters
  1036.     dim Index as integer
  1037.     dim PageSetup as WordPageSetup
  1038.     dim Parent as OLEObject
  1039.     dim ProtectedForForms as boolean
  1040.     dim Range as WordRange
  1041. End Class
  1042.  
  1043. Class WordParagraphs
  1044. inherits OLEObject
  1045.     dim AddSpaceBetweenFarEastAndAlpha as integer
  1046.     dim AddSpaceBetweenFarEastAndDigit as integer
  1047.     dim Alignment as integer
  1048.     dim Application as WordApplication
  1049.     dim AutoAdjustRightIndent as integer
  1050.     dim BaseLineAlignment as integer
  1051.     dim Borders as WordBorders
  1052.     dim CharacterUnitFirstLineIndent as single
  1053.     dim CharacterUnitLeftIndent as single
  1054.     dim CharacterUnitRightIndent as single
  1055.     dim Count as integer
  1056.     dim Creator as integer
  1057.     dim DisableLineHeightGrid as integer
  1058.     dim FarEastLineBreakControl as integer
  1059.     dim First as WordParagraph
  1060.     dim FirstLineIndent as single
  1061.     dim Format as WordParagraphFormat
  1062.     dim HalfWidthPunctuationOnTopOfLine as integer
  1063.     dim HangingPunctuation as integer
  1064.     dim Hyphenation as integer
  1065.     dim KeepTogether as integer
  1066.     dim KeepWithNext as integer
  1067.     dim Last as WordParagraph
  1068.     dim LeftIndent as single
  1069.     dim LineSpacing as single
  1070.     dim LineSpacingRule as integer
  1071.     dim LineUnitAfter as single
  1072.     dim LineUnitBefore as single
  1073.     dim NoLineNumber as integer
  1074.     dim OutlineLevel as integer
  1075.     dim PageBreakBefore as integer
  1076.     dim Parent as OLEObject
  1077.     dim ReadingOrder as integer
  1078.     dim RightIndent as single
  1079.     dim Shading as WordShading
  1080.     dim SpaceAfter as single
  1081.     dim SpaceAfterAuto as integer
  1082.     dim SpaceBefore as single
  1083.     dim SpaceBeforeAuto as integer
  1084.     dim Style as variant
  1085.     dim TabStops as WordTabStops
  1086.     dim WidowControl as integer
  1087.     dim WordWrap as integer
  1088.     dim _NewEnum as OLEObject
  1089.     Function Add(Range_Param as variant) as WordParagraph
  1090.     Sub CloseUp()
  1091.     Sub Indent()
  1092.     Sub IndentCharWidth(Count_Param as integer)
  1093.     Sub IndentFirstLineCharWidth(Count_Param as integer)
  1094.     Function Item(Index_Param as integer) as WordParagraph
  1095.     Sub OpenOrCloseUp()
  1096.     Sub OpenUp()
  1097.     Sub Outdent()
  1098.     Sub OutlineDemote()
  1099.     Sub OutlineDemoteToBody()
  1100.     Sub OutlinePromote()
  1101.     Sub Reset()
  1102.     Sub Space1()
  1103.     Sub Space15()
  1104.     Sub Space2()
  1105.     Sub TabHangingIndent(Count_Param as integer)
  1106.     Sub TabIndent(Count_Param as integer)
  1107. End Class
  1108.  
  1109. Class WordParagraph
  1110. inherits OLEObject
  1111.     dim AddSpaceBetweenFarEastAndAlpha as integer
  1112.     dim AddSpaceBetweenFarEastAndDigit as integer
  1113.     dim Alignment as integer
  1114.     dim Application as WordApplication
  1115.     dim AutoAdjustRightIndent as integer
  1116.     dim BaseLineAlignment as integer
  1117.     dim Borders as WordBorders
  1118.     dim CharacterUnitFirstLineIndent as single
  1119.     dim CharacterUnitLeftIndent as single
  1120.     dim CharacterUnitRightIndent as single
  1121.     dim Creator as integer
  1122.     dim DisableLineHeightGrid as integer
  1123.     dim DropCap as WordDropCap
  1124.     dim FarEastLineBreakControl as integer
  1125.     dim FirstLineIndent as single
  1126.     dim Format as WordParagraphFormat
  1127.     dim HalfWidthPunctuationOnTopOfLine as integer
  1128.     dim HangingPunctuation as integer
  1129.     dim Hyphenation as integer
  1130.     dim ID as string
  1131.     dim KeepTogether as integer
  1132.     dim KeepWithNext as integer
  1133.     dim LeftIndent as single
  1134.     dim LineSpacing as single
  1135.     dim LineSpacingRule as integer
  1136.     dim LineUnitAfter as single
  1137.     dim LineUnitBefore as single
  1138.     dim NoLineNumber as integer
  1139.     dim OutlineLevel as integer
  1140.     dim PageBreakBefore as integer
  1141.     dim Parent as OLEObject
  1142.     dim Range as WordRange
  1143.     dim ReadingOrder as integer
  1144.     dim RightIndent as single
  1145.     dim Shading as WordShading
  1146.     dim SpaceAfter as single
  1147.     dim SpaceAfterAuto as integer
  1148.     dim SpaceBefore as single
  1149.     dim SpaceBeforeAuto as integer
  1150.     dim Style as variant
  1151.     dim TabStops as WordTabStops
  1152.     dim WidowControl as integer
  1153.     dim WordWrap as integer
  1154.     Sub CloseUp()
  1155.     Sub Indent()
  1156.     Sub IndentCharWidth(Count_Param as integer)
  1157.     Sub IndentFirstLineCharWidth(Count_Param as integer)
  1158.     Function Next_(Count_Param as variant) as WordParagraph
  1159.     Sub OpenOrCloseUp()
  1160.     Sub OpenUp()
  1161.     Sub Outdent()
  1162.     Sub OutlineDemote()
  1163.     Sub OutlineDemoteToBody()
  1164.     Sub OutlinePromote()
  1165.     Function Previous(Count_Param as variant) as WordParagraph
  1166.     Sub Reset()
  1167.     Sub Space1()
  1168.     Sub Space15()
  1169.     Sub Space2()
  1170.     Sub TabHangingIndent(Count_Param as integer)
  1171.     Sub TabIndent(Count_Param as integer)
  1172. End Class
  1173.  
  1174. Class WordDropCap
  1175. inherits OLEObject
  1176.     dim Application as WordApplication
  1177.     dim Creator as integer
  1178.     dim DistanceFromText as single
  1179.     dim FontName as string
  1180.     dim LinesToDrop as integer
  1181.     dim Parent as OLEObject
  1182.     dim Position as integer
  1183.     Sub Clear()
  1184.     Sub Enable()
  1185. End Class
  1186.  
  1187. Class WordTabStops
  1188. inherits OLEObject
  1189.     dim Application as WordApplication
  1190.     dim Count as integer
  1191.     dim Creator as integer
  1192.     dim Parent as OLEObject
  1193.     dim _NewEnum as OLEObject
  1194.     Function Add(Position_Param as single, Alignment_Param as variant, Leader_Param as variant) as WordTabStop
  1195.     Function After(Position_Param as single) as WordTabStop
  1196.     Function Before(Position_Param as single) as WordTabStop
  1197.     Sub ClearAll()
  1198.     Function Item(Index_Param as variant) as WordTabStop
  1199. End Class
  1200.  
  1201. Class WordTabStop
  1202. inherits OLEObject
  1203.     dim Alignment as integer
  1204.     dim Application as WordApplication
  1205.     dim Creator as integer
  1206.     dim CustomTab as boolean
  1207.     dim Leader as integer
  1208.     dim Next_ as WordTabStop
  1209.     dim Parent as OLEObject
  1210.     dim Position as single
  1211.     dim Previous as WordTabStop
  1212.     Sub Clear()
  1213. End Class
  1214.  
  1215. Class WordParagraphFormat
  1216. inherits OLEObject
  1217.     dim AddSpaceBetweenFarEastAndAlpha as integer
  1218.     dim AddSpaceBetweenFarEastAndDigit as integer
  1219.     dim Alignment as integer
  1220.     dim Application as WordApplication
  1221.     dim AutoAdjustRightIndent as integer
  1222.     dim BaseLineAlignment as integer
  1223.     dim Borders as WordBorders
  1224.     dim CharacterUnitFirstLineIndent as single
  1225.     dim CharacterUnitLeftIndent as single
  1226.     dim CharacterUnitRightIndent as single
  1227.     dim Creator as integer
  1228.     dim DisableLineHeightGrid as integer
  1229.     dim Duplicate as WordParagraphFormat
  1230.     dim FarEastLineBreakControl as integer
  1231.     dim FirstLineIndent as single
  1232.     dim HalfWidthPunctuationOnTopOfLine as integer
  1233.     dim HangingPunctuation as integer
  1234.     dim Hyphenation as integer
  1235.     dim KeepTogether as integer
  1236.     dim KeepWithNext as integer
  1237.     dim LeftIndent as single
  1238.     dim LineSpacing as single
  1239.     dim LineSpacingRule as integer
  1240.     dim LineUnitAfter as single
  1241.     dim LineUnitBefore as single
  1242.     dim NoLineNumber as integer
  1243.     dim OutlineLevel as integer
  1244.     dim PageBreakBefore as integer
  1245.     dim Parent as OLEObject
  1246.     dim ReadingOrder as integer
  1247.     dim RightIndent as single
  1248.     dim Shading as WordShading
  1249.     dim SpaceAfter as single
  1250.     dim SpaceAfterAuto as integer
  1251.     dim SpaceBefore as single
  1252.     dim SpaceBeforeAuto as integer
  1253.     dim Style as variant
  1254.     dim TabStops as WordTabStops
  1255.     dim WidowControl as integer
  1256.     dim WordWrap as integer
  1257.     Sub CloseUp()
  1258.     Sub IndentCharWidth(Count_Param as integer)
  1259.     Sub IndentFirstLineCharWidth(Count_Param as integer)
  1260.     Sub OpenOrCloseUp()
  1261.     Sub OpenUp()
  1262.     Sub Reset()
  1263.     Sub Space1()
  1264.     Sub Space15()
  1265.     Sub Space2()
  1266.     Sub TabHangingIndent(Count_Param as integer)
  1267.     Sub TabIndent(Count_Param as integer)
  1268. End Class
  1269.  
  1270. Class WordFont
  1271. inherits OLEObject
  1272.     dim AllCaps as integer
  1273.     dim Animation as integer
  1274.     dim Application as WordApplication
  1275.     dim Bold as integer
  1276.     dim BoldBi as integer
  1277.     dim Borders as WordBorders
  1278.     dim Color_ as integer
  1279.     dim ColorIndex as integer
  1280.     dim ColorIndexBi as integer
  1281.     dim Creator as integer
  1282.     dim DiacriticColor as integer
  1283.     dim DisableCharacterSpaceGrid as boolean
  1284.     dim DoubleStrikeThrough as integer
  1285.     dim Duplicate as WordFont
  1286.     dim Emboss as integer
  1287.     dim EmphasisMark as integer
  1288.     dim Engrave as integer
  1289.     dim Hidden as integer
  1290.     dim Italic as integer
  1291.     dim ItalicBi as integer
  1292.     dim Kerning as single
  1293.     dim Name as string
  1294.     dim NameAscii as string
  1295.     dim NameBi as string
  1296.     dim NameFarEast as string
  1297.     dim NameOther as string
  1298.     dim Outline as integer
  1299.     dim Parent as OLEObject
  1300.     dim Position as integer
  1301.     dim Scaling as integer
  1302.     dim Shading as WordShading
  1303.     dim Shadow as integer
  1304.     dim Size as single
  1305.     dim SizeBi as single
  1306.     dim SmallCaps as integer
  1307.     dim Spacing as single
  1308.     dim StrikeThrough as integer
  1309.     dim Subscript as integer
  1310.     dim Superscript as integer
  1311.     dim Underline as integer
  1312.     dim UnderlineColor as integer
  1313.     Sub Grow()
  1314.     Sub Reset()
  1315.     Sub SetAsTemplateDefault()
  1316.     Sub Shrink()
  1317. End Class
  1318.  
  1319. Class WordTable
  1320. inherits OLEObject
  1321.     dim AllowAutoFit as boolean
  1322.     dim AllowPageBreaks as boolean
  1323.     dim Application as WordApplication
  1324.     dim AutoFormatType as integer
  1325.     dim Borders as WordBorders
  1326.     dim BottomPadding as single
  1327.     dim Columns as WordColumns
  1328.     dim Creator as integer
  1329.     dim ID as string
  1330.     dim LeftPadding as single
  1331.     dim NestingLevel as integer
  1332.     dim Parent as OLEObject
  1333.     dim PreferredWidth as single
  1334.     dim PreferredWidthType as integer
  1335.     dim Range as WordRange
  1336.     dim RightPadding as single
  1337.     dim Rows as WordRows
  1338.     dim Shading as WordShading
  1339.     dim Spacing as single
  1340.     dim TableDirection as integer
  1341.     dim Tables as WordTables
  1342.     dim TopPadding as single
  1343.     dim Uniform as boolean
  1344.     Sub AutoFitBehavior(Behavior_Param as integer)
  1345.     Sub AutoFormat(Format_Param as variant, ApplyBorders_Param as variant, ApplyShading_Param as variant, ApplyFont_Param as variant, ApplyColor_Param as variant, ApplyHeadingRows_Param as variant, ApplyLastRow_Param as variant, ApplyFirstColumn_Param as variant, ApplyLastColumn_Param as variant, AutoFit_Param as variant)
  1346.     Function Cell(Row_Param as integer, Column_Param as integer) as WordCell
  1347.     Function ConvertToText(Separator_Param as variant, NestedTables_Param as variant) as WordRange
  1348.     Function ConvertToTextOld(Separator_Param as variant) as WordRange
  1349.     Sub Delete()
  1350.     Sub Select_()
  1351.     Sub Sort(ExcludeHeader_Param as variant, FieldNumber_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, FieldNumber2_Param as variant, SortFieldType2_Param as variant, SortOrder2_Param as variant, FieldNumber3_Param as variant, SortFieldType3_Param as variant, SortOrder3_Param as variant, CaseSensitive_Param as variant, BidiSort_Param as variant, IgnoreThe_Param as variant, IgnoreKashida_Param as variant, IgnoreDiacritics_Param as variant, IgnoreHe_Param as variant, LanguageID_Param as variant)
  1352.     Sub SortAscending()
  1353.     Sub SortDescending()
  1354.     Sub SortOld(ExcludeHeader_Param as variant, FieldNumber_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, FieldNumber2_Param as variant, SortFieldType2_Param as variant, SortOrder2_Param as variant, FieldNumber3_Param as variant, SortFieldType3_Param as variant, SortOrder3_Param as variant, CaseSensitive_Param as variant, LanguageID_Param as variant)
  1355.     Function Split(BeforeRow_Param as variant) as WordTable
  1356.     Sub UpdateAutoFormat()
  1357. End Class
  1358.  
  1359. Class WordRow
  1360. inherits OLEObject
  1361.     dim Alignment as integer
  1362.     dim AllowBreakAcrossPages as integer
  1363.     dim Application as WordApplication
  1364.     dim Borders as WordBorders
  1365.     dim Cells as WordCells
  1366.     dim Creator as integer
  1367.     dim HeadingFormat as integer
  1368.     dim Height as single
  1369.     dim HeightRule as integer
  1370.     dim ID as string
  1371.     dim Index as integer
  1372.     dim IsFirst as boolean
  1373.     dim IsLast as boolean
  1374.     dim LeftIndent as single
  1375.     dim NestingLevel as integer
  1376.     dim Next_ as WordRow
  1377.     dim Parent as OLEObject
  1378.     dim Previous as WordRow
  1379.     dim Range as WordRange
  1380.     dim Shading as WordShading
  1381.     dim SpaceBetweenColumns as single
  1382.     Function ConvertToText(Separator_Param as variant, NestedTables_Param as variant) as WordRange
  1383.     Function ConvertToTextOld(Separator_Param as variant) as WordRange
  1384.     Sub Delete()
  1385.     Sub Select_()
  1386.     Sub SetHeight(RowHeight_Param as single, HeightRule_Param as integer)
  1387.     Sub SetLeftIndent(LeftIndent_Param as single, RulerStyle_Param as integer)
  1388. End Class
  1389.  
  1390. Class WordColumn
  1391. inherits OLEObject
  1392.     dim Application as WordApplication
  1393.     dim Borders as WordBorders
  1394.     dim Cells as WordCells
  1395.     dim Creator as integer
  1396.     dim Index as integer
  1397.     dim IsFirst as boolean
  1398.     dim IsLast as boolean
  1399.     dim NestingLevel as integer
  1400.     dim Next_ as WordColumn
  1401.     dim Parent as OLEObject
  1402.     dim PreferredWidth as single
  1403.     dim PreferredWidthType as integer
  1404.     dim Previous as WordColumn
  1405.     dim Shading as WordShading
  1406.     dim Width as single
  1407.     Sub AutoFit()
  1408.     Sub Delete()
  1409.     Sub Select_()
  1410.     Sub SetWidth(ColumnWidth_Param as single, RulerStyle_Param as integer)
  1411.     Sub Sort(ExcludeHeader_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, CaseSensitive_Param as variant, BidiSort_Param as variant, IgnoreThe_Param as variant, IgnoreKashida_Param as variant, IgnoreDiacritics_Param as variant, IgnoreHe_Param as variant, LanguageID_Param as variant)
  1412.     Sub SortOld(ExcludeHeader_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, CaseSensitive_Param as variant, LanguageID_Param as variant)
  1413. End Class
  1414.  
  1415. Class WordCell
  1416. inherits OLEObject
  1417.     dim Application as WordApplication
  1418.     dim Borders as WordBorders
  1419.     dim BottomPadding as single
  1420.     dim Column as WordColumn
  1421.     dim ColumnIndex as integer
  1422.     dim Creator as integer
  1423.     dim FitText as boolean
  1424.     dim Height as single
  1425.     dim HeightRule as integer
  1426.     dim ID as string
  1427.     dim LeftPadding as single
  1428.     dim NestingLevel as integer
  1429.     dim Next_ as WordCell
  1430.     dim Parent as OLEObject
  1431.     dim PreferredWidth as single
  1432.     dim PreferredWidthType as integer
  1433.     dim Previous as WordCell
  1434.     dim Range as WordRange
  1435.     dim RightPadding as single
  1436.     dim Row as WordRow
  1437.     dim RowIndex as integer
  1438.     dim Shading as WordShading
  1439.     dim Tables as WordTables
  1440.     dim TopPadding as single
  1441.     dim VerticalAlignment as integer
  1442.     dim Width as single
  1443.     dim WordWrap as boolean
  1444.     Sub AutoSum()
  1445.     Sub Delete(ShiftCells_Param as variant)
  1446.     Sub Formula(Formula_Param as variant, NumFormat_Param as variant)
  1447.     Sub Merge(MergeTo_Param as WordCell)
  1448.     Sub Select_()
  1449.     Sub SetHeight(RowHeight_Param as variant, HeightRule_Param as integer)
  1450.     Sub SetWidth(ColumnWidth_Param as single, RulerStyle_Param as integer)
  1451.     Sub Split(NumRows_Param as variant, NumColumns_Param as variant)
  1452. End Class
  1453.  
  1454. Class WordTables
  1455. inherits OLEObject
  1456.     dim Application as WordApplication
  1457.     dim Count as integer
  1458.     dim Creator as integer
  1459.     dim NestingLevel as integer
  1460.     dim Parent as OLEObject
  1461.     dim _NewEnum as OLEObject
  1462.     Function Add(Range_Param as WordRange, NumRows_Param as integer, NumColumns_Param as integer, DefaultTableBehavior_Param as variant, AutoFitBehavior_Param as variant) as WordTable
  1463.     Function AddOld(Range_Param as WordRange, NumRows_Param as integer, NumColumns_Param as integer) as WordTable
  1464.     Function Item(Index_Param as integer) as WordTable
  1465. End Class
  1466.  
  1467. Class WordRows
  1468. inherits OLEObject
  1469.     dim Alignment as integer
  1470.     dim AllowBreakAcrossPages as integer
  1471.     dim AllowOverlap as integer
  1472.     dim Application as WordApplication
  1473.     dim Borders as WordBorders
  1474.     dim Count as integer
  1475.     dim Creator as integer
  1476.     dim DistanceBottom as single
  1477.     dim DistanceLeft as single
  1478.     dim DistanceRight as single
  1479.     dim DistanceTop as single
  1480.     dim First as WordRow
  1481.     dim HeadingFormat as integer
  1482.     dim Height as single
  1483.     dim HeightRule as integer
  1484.     dim HorizontalPosition as single
  1485.     dim Last as WordRow
  1486.     dim LeftIndent as single
  1487.     dim NestingLevel as integer
  1488.     dim Parent as OLEObject
  1489.     dim RelativeHorizontalPosition as integer
  1490.     dim RelativeVerticalPosition as integer
  1491.     dim Shading as WordShading
  1492.     dim SpaceBetweenColumns as single
  1493.     dim TableDirection as integer
  1494.     dim VerticalPosition as single
  1495.     dim WrapAroundText as integer
  1496.     dim _NewEnum as OLEObject
  1497.     Function Add(BeforeRow_Param as variant) as WordRow
  1498.     Function ConvertToText(Separator_Param as variant, NestedTables_Param as variant) as WordRange
  1499.     Function ConvertToTextOld(Separator_Param as variant) as WordRange
  1500.     Sub Delete()
  1501.     Sub DistributeHeight()
  1502.     Function Item(Index_Param as integer) as WordRow
  1503.     Sub Select_()
  1504.     Sub SetHeight(RowHeight_Param as single, HeightRule_Param as integer)
  1505.     Sub SetLeftIndent(LeftIndent_Param as single, RulerStyle_Param as integer)
  1506. End Class
  1507.  
  1508. Class WordColumns
  1509. inherits OLEObject
  1510.     dim Application as WordApplication
  1511.     dim Borders as WordBorders
  1512.     dim Count as integer
  1513.     dim Creator as integer
  1514.     dim First as WordColumn
  1515.     dim Last as WordColumn
  1516.     dim NestingLevel as integer
  1517.     dim Parent as OLEObject
  1518.     dim PreferredWidth as single
  1519.     dim PreferredWidthType as integer
  1520.     dim Shading as WordShading
  1521.     dim Width as single
  1522.     dim _NewEnum as OLEObject
  1523.     Function Add(BeforeColumn_Param as variant) as WordColumn
  1524.     Sub AutoFit()
  1525.     Sub Delete()
  1526.     Sub DistributeWidth()
  1527.     Function Item(Index_Param as integer) as WordColumn
  1528.     Sub Select_()
  1529.     Sub SetWidth(ColumnWidth_Param as single, RulerStyle_Param as integer)
  1530. End Class
  1531.  
  1532. Class WordCells
  1533. inherits OLEObject
  1534.     dim Application as WordApplication
  1535.     dim Borders as WordBorders
  1536.     dim Count as integer
  1537.     dim Creator as integer
  1538.     dim Height as single
  1539.     dim HeightRule as integer
  1540.     dim NestingLevel as integer
  1541.     dim Parent as OLEObject
  1542.     dim PreferredWidth as single
  1543.     dim PreferredWidthType as integer
  1544.     dim Shading as WordShading
  1545.     dim VerticalAlignment as integer
  1546.     dim Width as single
  1547.     dim _NewEnum as OLEObject
  1548.     Function Add(BeforeCell_Param as variant) as WordCell
  1549.     Sub AutoFit()
  1550.     Sub Delete(ShiftCells_Param as variant)
  1551.     Sub DistributeHeight()
  1552.     Sub DistributeWidth()
  1553.     Function Item(Index_Param as integer) as WordCell
  1554.     Sub Merge()
  1555.     Sub SetHeight(RowHeight_Param as variant, HeightRule_Param as integer)
  1556.     Sub SetWidth(ColumnWidth_Param as single, RulerStyle_Param as integer)
  1557.     Sub Split(NumRows_Param as variant, NumColumns_Param as variant, MergeBeforeSplit_Param as variant)
  1558. End Class
  1559.  
  1560. Class WordAutoCorrect
  1561. inherits OLEObject
  1562.     dim Application as WordApplication
  1563.     dim CorrectCapsLock as boolean
  1564.     dim CorrectDays as boolean
  1565.     dim CorrectHangulAndAlphabet as boolean
  1566.     dim CorrectInitialCaps as boolean
  1567.     dim CorrectKeyboardSetting as boolean
  1568.     dim CorrectSentenceCaps as boolean
  1569.     dim Creator as integer
  1570.     dim Entries as WordAutoCorrectEntries
  1571.     dim FirstLetterAutoAdd as boolean
  1572.     dim FirstLetterExceptions as WordFirstLetterExceptions
  1573.     dim HangulAndAlphabetAutoAdd as boolean
  1574.     dim HangulAndAlphabetExceptions as WordHangulAndAlphabetExceptions
  1575.     dim OtherCorrectionsAutoAdd as boolean
  1576.     dim OtherCorrectionsExceptions as WordOtherCorrectionsExceptions
  1577.     dim Parent as OLEObject
  1578.     dim ReplaceText as boolean
  1579.     dim ReplaceTextFromSpellingChecker as boolean
  1580.     dim TwoInitialCapsAutoAdd as boolean
  1581.     dim TwoInitialCapsExceptions as WordTwoInitialCapsExceptions
  1582. End Class
  1583.  
  1584. Class WordAutoCorrectEntries
  1585. inherits OLEObject
  1586.     dim Application as WordApplication
  1587.     dim Count as integer
  1588.     dim Creator as integer
  1589.     dim Parent as OLEObject
  1590.     dim _NewEnum as OLEObject
  1591.     Function Add(Name_Param as string, Value_Param as string) as WordAutoCorrectEntry
  1592.     Function AddRichText(Name_Param as string, Range_Param as WordRange) as WordAutoCorrectEntry
  1593.     Function Item(Index_Param as variant) as WordAutoCorrectEntry
  1594. End Class
  1595.  
  1596. Class WordAutoCorrectEntry
  1597. inherits OLEObject
  1598.     dim Application as WordApplication
  1599.     dim Creator as integer
  1600.     dim Index as integer
  1601.     dim Name as string
  1602.     dim Parent as OLEObject
  1603.     dim RichText as boolean
  1604.     dim Value as string
  1605.     Sub Apply(Range_Param as WordRange)
  1606.     Sub Delete()
  1607. End Class
  1608.  
  1609. Class WordFirstLetterExceptions
  1610. inherits OLEObject
  1611.     dim Application as WordApplication
  1612.     dim Count as integer
  1613.     dim Creator as integer
  1614.     dim Parent as OLEObject
  1615.     dim _NewEnum as OLEObject
  1616.     Function Add(Name_Param as string) as WordFirstLetterException
  1617.     Function Item(Index_Param as variant) as WordFirstLetterException
  1618. End Class
  1619.  
  1620. Class WordFirstLetterException
  1621. inherits OLEObject
  1622.     dim Application as WordApplication
  1623.     dim Creator as integer
  1624.     dim Index as integer
  1625.     dim Name as string
  1626.     dim Parent as OLEObject
  1627.     Sub Delete()
  1628. End Class
  1629.  
  1630. Class WordTwoInitialCapsExceptions
  1631. inherits OLEObject
  1632.     dim Application as WordApplication
  1633.     dim Count as integer
  1634.     dim Creator as integer
  1635.     dim Parent as OLEObject
  1636.     dim _NewEnum as OLEObject
  1637.     Function Add(Name_Param as string) as WordTwoInitialCapsException
  1638.     Function Item(Index_Param as variant) as WordTwoInitialCapsException
  1639. End Class
  1640.  
  1641. Class WordTwoInitialCapsException
  1642. inherits OLEObject
  1643.     dim Application as WordApplication
  1644.     dim Creator as integer
  1645.     dim Index as integer
  1646.     dim Name as string
  1647.     dim Parent as OLEObject
  1648.     Sub Delete()
  1649. End Class
  1650.  
  1651. Class WordFootnotes
  1652. inherits OLEObject
  1653.     dim Application as WordApplication
  1654.     dim ContinuationNotice as WordRange
  1655.     dim ContinuationSeparator as WordRange
  1656.     dim Count as integer
  1657.     dim Creator as integer
  1658.     dim Location as integer
  1659.     dim NumberingRule as integer
  1660.     dim NumberStyle as integer
  1661.     dim Parent as OLEObject
  1662.     dim Separator as WordRange
  1663.     dim StartingNumber as integer
  1664.     dim _NewEnum as OLEObject
  1665.     Function Add(Range_Param as WordRange, Reference_Param as variant, Text_Param as variant) as WordFootnote
  1666.     Sub Convert()
  1667.     Function Item(Index_Param as integer) as WordFootnote
  1668.     Sub ResetContinuationNotice()
  1669.     Sub ResetContinuationSeparator()
  1670.     Sub ResetSeparator()
  1671.     Sub SwapWithEndnotes()
  1672. End Class
  1673.  
  1674. Class WordEndnotes
  1675. inherits OLEObject
  1676.     dim Application as WordApplication
  1677.     dim ContinuationNotice as WordRange
  1678.     dim ContinuationSeparator as WordRange
  1679.     dim Count as integer
  1680.     dim Creator as integer
  1681.     dim Location as integer
  1682.     dim NumberingRule as integer
  1683.     dim NumberStyle as integer
  1684.     dim Parent as OLEObject
  1685.     dim Separator as WordRange
  1686.     dim StartingNumber as integer
  1687.     dim _NewEnum as OLEObject
  1688.     Function Add(Range_Param as WordRange, Reference_Param as variant, Text_Param as variant) as WordEndnote
  1689.     Sub Convert()
  1690.     Function Item(Index_Param as integer) as WordEndnote
  1691.     Sub ResetContinuationNotice()
  1692.     Sub ResetContinuationSeparator()
  1693.     Sub ResetSeparator()
  1694.     Sub SwapWithFootnotes()
  1695. End Class
  1696.  
  1697. Class WordComments
  1698. inherits OLEObject
  1699.     dim Application as WordApplication
  1700.     dim Count as integer
  1701.     dim Creator as integer
  1702.     dim Parent as OLEObject
  1703.     dim ShowBy as string
  1704.     dim _NewEnum as OLEObject
  1705.     Function Add(Range_Param as WordRange, Text_Param as variant) as WordComment
  1706.     Function Item(Index_Param as integer) as WordComment
  1707. End Class
  1708.  
  1709. Class WordFootnote
  1710. inherits OLEObject
  1711.     dim Application as WordApplication
  1712.     dim Creator as integer
  1713.     dim Index as integer
  1714.     dim Parent as OLEObject
  1715.     dim Range as WordRange
  1716.     dim Reference as WordRange
  1717.     Sub Delete()
  1718. End Class
  1719.  
  1720. Class WordEndnote
  1721. inherits OLEObject
  1722.     dim Application as WordApplication
  1723.     dim Creator as integer
  1724.     dim Index as integer
  1725.     dim Parent as OLEObject
  1726.     dim Range as WordRange
  1727.     dim Reference as WordRange
  1728.     Sub Delete()
  1729. End Class
  1730.  
  1731. Class WordComment
  1732. inherits OLEObject
  1733.     dim Application as WordApplication
  1734.     dim Author as string
  1735.     dim Creator as integer
  1736.     dim Index as integer
  1737.     dim Initial as string
  1738.     dim Parent as OLEObject
  1739.     dim Range as WordRange
  1740.     dim Reference as WordRange
  1741.     dim Scope as WordRange
  1742.     dim ShowTip as boolean
  1743.     Sub Delete()
  1744. End Class
  1745.  
  1746. Class WordBorders
  1747. inherits OLEObject
  1748.     dim AlwaysInFront as boolean
  1749.     dim Application as WordApplication
  1750.     dim Count as integer
  1751.     dim Creator as integer
  1752.     dim DistanceFrom as integer
  1753.     dim DistanceFromBottom as integer
  1754.     dim DistanceFromLeft as integer
  1755.     dim DistanceFromRight as integer
  1756.     dim DistanceFromTop as integer
  1757.     dim Enable as integer
  1758.     dim EnableFirstPageInSection as boolean
  1759.     dim EnableOtherPagesInSection as boolean
  1760.     dim HasHorizontal as boolean
  1761.     dim HasVertical as boolean
  1762.     dim InsideColor as integer
  1763.     dim InsideColorIndex as integer
  1764.     dim InsideLineStyle as integer
  1765.     dim InsideLineWidth as integer
  1766.     dim JoinBorders as boolean
  1767.     dim OutsideColor as integer
  1768.     dim OutsideColorIndex as integer
  1769.     dim OutsideLineStyle as integer
  1770.     dim OutsideLineWidth as integer
  1771.     dim Parent as OLEObject
  1772.     dim Shadow as boolean
  1773.     dim SurroundFooter as boolean
  1774.     dim SurroundHeader as boolean
  1775.     dim _NewEnum as OLEObject
  1776.     Sub ApplyPageBordersToAllSections()
  1777.     Function Item(Index_Param as integer) as WordBorder
  1778. End Class
  1779.  
  1780. Class WordBorder
  1781. inherits OLEObject
  1782.     dim Application as WordApplication
  1783.     dim ArtStyle as integer
  1784.     dim ArtWidth as integer
  1785.     dim Color_ as integer
  1786.     dim ColorIndex as integer
  1787.     dim Creator as integer
  1788.     dim Inside as boolean
  1789.     dim LineStyle as integer
  1790.     dim LineWidth as integer
  1791.     dim Parent as OLEObject
  1792.     dim Visible as boolean
  1793. End Class
  1794.  
  1795. Class WordShading
  1796. inherits OLEObject
  1797.     dim Application as WordApplication
  1798.     dim BackgroundPatternColor as integer
  1799.     dim BackgroundPatternColorIndex as integer
  1800.     dim Creator as integer
  1801.     dim ForegroundPatternColor as integer
  1802.     dim ForegroundPatternColorIndex as integer
  1803.     dim Parent as OLEObject
  1804.     dim Texture as integer
  1805. End Class
  1806.  
  1807. Class WordTextRetrievalMode
  1808. inherits OLEObject
  1809.     dim Application as WordApplication
  1810.     dim Creator as integer
  1811.     dim Duplicate as WordTextRetrievalMode
  1812.     dim IncludeFieldCodes as boolean
  1813.     dim IncludeHiddenText as boolean
  1814.     dim Parent as OLEObject
  1815.     dim ViewType as integer
  1816. End Class
  1817.  
  1818. Class WordAutoTextEntries
  1819. inherits OLEObject
  1820.     dim Application as WordApplication
  1821.     dim Count as integer
  1822.     dim Creator as integer
  1823.     dim Parent as OLEObject
  1824.     dim _NewEnum as OLEObject
  1825.     Function Add(Name_Param as string, Range_Param as WordRange) as WordAutoTextEntry
  1826.     Function AppendToSpike(Range_Param as WordRange) as WordAutoTextEntry
  1827.     Function Item(Index_Param as variant) as WordAutoTextEntry
  1828. End Class
  1829.  
  1830. Class WordAutoTextEntry
  1831. inherits OLEObject
  1832.     dim Application as WordApplication
  1833.     dim Creator as integer
  1834.     dim Index as integer
  1835.     dim Name as string
  1836.     dim Parent as OLEObject
  1837.     dim StyleName as string
  1838.     dim Value as string
  1839.     Sub Delete()
  1840.     Function Insert(Where_Param as WordRange, RichText_Param as variant) as WordRange
  1841. End Class
  1842.  
  1843. Class WordSystem
  1844. inherits OLEObject
  1845.     dim Application as WordApplication
  1846.     dim ComputerType as string
  1847.     dim Country as integer
  1848.     dim Creator as integer
  1849.     dim Cursor as integer
  1850.     dim FreeDiskSpace as integer
  1851.     dim HorizontalResolution as integer
  1852.     dim LanguageDesignation as string
  1853.     dim MacintoshName as string
  1854.     dim MathCoprocessorInstalled as boolean
  1855.     dim OperatingSystem as string
  1856.     dim Parent as OLEObject
  1857.     dim ProcessorType as string
  1858.     dim QuickDrawInstalled as boolean
  1859.     dim Version as string
  1860.     dim VerticalResolution as integer
  1861.     Sub Connect(Path_Param as string, Drive_Param as variant, Password_Param as variant)
  1862.     Sub MSInfo()
  1863.     Function PrivateProfileString(FileName_Param as string, Section_Param as string, Key_Param as string) as string
  1864.     Function ProfileString(Section_Param as string, Key_Param as string) as string
  1865. End Class
  1866.  
  1867. Class WordOLEFormat
  1868. inherits OLEObject
  1869.     dim Application as WordApplication
  1870.     dim ClassType as string
  1871.     dim Creator as integer
  1872.     dim DisplayAsIcon as boolean
  1873.     dim IconIndex as integer
  1874.     dim IconLabel as string
  1875.     dim IconName as string
  1876.     dim IconPath as string
  1877.     dim Label as string
  1878.     dim Object_ as OLEObject
  1879.     dim Parent as OLEObject
  1880.     dim ProgID as string
  1881.     Sub Activate()
  1882.     Sub ActivateAs(ClassType_Param as string)
  1883.     Sub ConvertTo(ClassType_Param as variant, DisplayAsIcon_Param as variant, IconFileName_Param as variant, IconIndex_Param as variant, IconLabel_Param as variant)
  1884.     Sub DoVerb(VerbIndex_Param as variant)
  1885.     Sub Edit()
  1886.     Sub Open()
  1887. End Class
  1888.  
  1889. Class WordLinkFormat
  1890. inherits OLEObject
  1891.     dim Application as WordApplication
  1892.     dim AutoUpdate as boolean
  1893.     dim Creator as integer
  1894.     dim Locked as boolean
  1895.     dim Parent as OLEObject
  1896.     dim SavePictureWithDocument as boolean
  1897.     dim SourceFullName as string
  1898.     dim SourceName as string
  1899.     dim SourcePath as string
  1900.     dim Type as integer
  1901.     Sub BreakLink()
  1902.     Sub Update()
  1903. End Class
  1904.  
  1905. Class WordOLEControl
  1906. inherits OLEObject
  1907.     dim AltHTML as string
  1908.     dim Automation as OLEObject
  1909.     dim Height as single
  1910.     dim Left as single
  1911.     dim Name as string
  1912.     dim Top as single
  1913.     dim Width as single
  1914.     Sub Activate()
  1915.     Sub Copy()
  1916.     Sub Cut()
  1917.     Sub Delete()
  1918.     Sub Select_()
  1919. End Class
  1920.  
  1921. Class WordFields
  1922. inherits OLEObject
  1923.     dim Application as WordApplication
  1924.     dim Count as integer
  1925.     dim Creator as integer
  1926.     dim Locked as integer
  1927.     dim Parent as OLEObject
  1928.     dim _NewEnum as OLEObject
  1929.     Function Add(Range_Param as WordRange, Type_Param as variant, Text_Param as variant, PreserveFormatting_Param as variant) as WordField
  1930.     Function Item(Index_Param as integer) as WordField
  1931.     Sub ToggleShowCodes()
  1932.     Sub Unlink()
  1933.     Function Update() as integer
  1934.     Sub UpdateSource()
  1935. End Class
  1936.  
  1937. Class WordField
  1938. inherits OLEObject
  1939.     dim Application as WordApplication
  1940.     dim Code as WordRange
  1941.     dim Creator as integer
  1942.     dim Data as string
  1943.     dim Index as integer
  1944.     dim InlineShape as WordInlineShape
  1945.     dim Kind as integer
  1946.     dim LinkFormat as WordLinkFormat
  1947.     dim Locked as boolean
  1948.     dim Next_ as WordField
  1949.     dim OLEFormat as WordOLEFormat
  1950.     dim Parent as OLEObject
  1951.     dim Previous as WordField
  1952.     dim Result as WordRange
  1953.     dim ShowCodes as boolean
  1954.     dim Type as integer
  1955.     Sub Copy()
  1956.     Sub Cut()
  1957.     Sub Delete()
  1958.     Sub DoClick()
  1959.     Sub Select_()
  1960.     Sub Unlink()
  1961.     Function Update() as boolean
  1962.     Sub UpdateSource()
  1963. End Class
  1964.  
  1965. Class WordBrowser
  1966. inherits OLEObject
  1967.     dim Application as WordApplication
  1968.     dim Creator as integer
  1969.     dim Parent as OLEObject
  1970.     dim Target as integer
  1971.     Sub Next_()
  1972.     Sub Previous()
  1973. End Class
  1974.  
  1975. Class WordStyles
  1976. inherits OLEObject
  1977.     dim Application as WordApplication
  1978.     dim Count as integer
  1979.     dim Creator as integer
  1980.     dim Parent as OLEObject
  1981.     dim _NewEnum as OLEObject
  1982.     Function Add(Name_Param as string, Type_Param as variant) as WordStyle
  1983.     Function Item(Index_Param as variant) as WordStyle
  1984. End Class
  1985.  
  1986. Class WordStyle
  1987. inherits OLEObject
  1988.     dim Application as WordApplication
  1989.     dim AutomaticallyUpdate as boolean
  1990.     dim BaseStyle as variant
  1991.     dim Borders as WordBorders
  1992.     dim BuiltIn as boolean
  1993.     dim Creator as integer
  1994.     dim Description as string
  1995.     dim Font as WordFont
  1996.     dim Frame as WordFrame
  1997.     dim Hidden as boolean
  1998.     dim InUse as boolean
  1999.     dim LanguageID as integer
  2000.     dim LanguageIDFarEast as integer
  2001.     dim ListLevelNumber as integer
  2002.     dim ListTemplate as WordListTemplate
  2003.     dim NameLocal as string
  2004.     dim NextParagraphStyle as variant
  2005.     dim NoProofing as integer
  2006.     dim ParagraphFormat as WordParagraphFormat
  2007.     dim Parent as OLEObject
  2008.     dim Shading as WordShading
  2009.     dim Type as integer
  2010.     Sub Delete()
  2011.     Sub LinkToListTemplate(ListTemplate_Param as WordListTemplate, ListLevelNumber_Param as variant)
  2012. End Class
  2013.  
  2014. Class WordFrames
  2015. inherits OLEObject
  2016.     dim Application as WordApplication
  2017.     dim Count as integer
  2018.     dim Creator as integer
  2019.     dim Parent as OLEObject
  2020.     dim _NewEnum as OLEObject
  2021.     Function Add(Range_Param as WordRange) as WordFrame
  2022.     Sub Delete()
  2023.     Function Item(Index_Param as integer) as WordFrame
  2024. End Class
  2025.  
  2026. Class WordFrame
  2027. inherits OLEObject
  2028.     dim Application as WordApplication
  2029.     dim Borders as WordBorders
  2030.     dim Creator as integer
  2031.     dim Height as single
  2032.     dim HeightRule as integer
  2033.     dim HorizontalDistanceFromText as single
  2034.     dim HorizontalPosition as single
  2035.     dim LockAnchor as boolean
  2036.     dim Parent as OLEObject
  2037.     dim Range as WordRange
  2038.     dim RelativeHorizontalPosition as integer
  2039.     dim RelativeVerticalPosition as integer
  2040.     dim Shading as WordShading
  2041.     dim TextWrap as boolean
  2042.     dim VerticalDistanceFromText as single
  2043.     dim VerticalPosition as single
  2044.     dim Width as single
  2045.     dim WidthRule as integer
  2046.     Sub Copy()
  2047.     Sub Cut()
  2048.     Sub Delete()
  2049.     Sub Select_()
  2050. End Class
  2051.  
  2052. Class WordFormFields
  2053. inherits OLEObject
  2054.     dim Application as WordApplication
  2055.     dim Count as integer
  2056.     dim Creator as integer
  2057.     dim Parent as OLEObject
  2058.     dim Shaded as boolean
  2059.     dim _NewEnum as OLEObject
  2060.     Function Add(Range_Param as WordRange, Type_Param as integer) as WordFormField
  2061.     Function Item(Index_Param as variant) as WordFormField
  2062. End Class
  2063.  
  2064. Class WordFormField
  2065. inherits OLEObject
  2066.     dim Application as WordApplication
  2067.     dim CalculateOnExit as boolean
  2068.     dim CheckBox as WordCheckBox
  2069.     dim Creator as integer
  2070.     dim DropDown as WordDropDown
  2071.     dim Enabled as boolean
  2072.     dim EntryMacro as string
  2073.     dim ExitMacro as string
  2074.     dim HelpText as string
  2075.     dim Name as string
  2076.     dim Next_ as WordFormField
  2077.     dim OwnHelp as boolean
  2078.     dim OwnStatus as boolean
  2079.     dim Parent as OLEObject
  2080.     dim Previous as WordFormField
  2081.     dim Range as WordRange
  2082.     dim Result as string
  2083.     dim StatusText as string
  2084.     dim TextInput as WordTextInput
  2085.     dim Type as integer
  2086.     Sub Copy()
  2087.     Sub Cut()
  2088.     Sub Delete()
  2089.     Sub Select_()
  2090. End Class
  2091.  
  2092. Class WordTextInput
  2093. inherits OLEObject
  2094.     dim Application as WordApplication
  2095.     dim Creator as integer
  2096.     dim Default as string
  2097.     dim Format as string
  2098.     dim Parent as OLEObject
  2099.     dim Type as integer
  2100.     dim Valid as boolean
  2101.     dim Width as integer
  2102.     Sub Clear()
  2103.     Sub EditType(Type_Param as integer, Default_Param as variant, Format_Param as variant, Enabled_Param as variant)
  2104. End Class
  2105.  
  2106. Class WordCheckBox
  2107. inherits OLEObject
  2108.     dim Application as WordApplication
  2109.     dim AutoSize as boolean
  2110.     dim Creator as integer
  2111.     dim Default as boolean
  2112.     dim Parent as OLEObject
  2113.     dim Size as single
  2114.     dim Valid as boolean
  2115.     dim Value as boolean
  2116. End Class
  2117.  
  2118. Class WordDropDown
  2119. inherits OLEObject
  2120.     dim Application as WordApplication
  2121.     dim Creator as integer
  2122.     dim Default as integer
  2123.     dim ListEntries as WordListEntries
  2124.     dim Parent as OLEObject
  2125.     dim Valid as boolean
  2126.     dim Value as integer
  2127. End Class
  2128.  
  2129. Class WordListEntries
  2130. inherits OLEObject
  2131.     dim Application as WordApplication
  2132.     dim Count as integer
  2133.     dim Creator as integer
  2134.     dim Parent as OLEObject
  2135.     dim _NewEnum as OLEObject
  2136.     Function Add(Name_Param as string, Index_Param as variant) as WordListEntry
  2137.     Sub Clear()
  2138.     Function Item(Index_Param as variant) as WordListEntry
  2139. End Class
  2140.  
  2141. Class WordListEntry
  2142. inherits OLEObject
  2143.     dim Application as WordApplication
  2144.     dim Creator as integer
  2145.     dim Index as integer
  2146.     dim Name as string
  2147.     dim Parent as OLEObject
  2148.     Sub Delete()
  2149. End Class
  2150.  
  2151. Class WordTablesOfFigures
  2152. inherits OLEObject
  2153.     dim Application as WordApplication
  2154.     dim Count as integer
  2155.     dim Creator as integer
  2156.     dim Format as integer
  2157.     dim Parent as OLEObject
  2158.     dim _NewEnum as OLEObject
  2159.     Function Add(Range_Param as WordRange, Caption_Param as variant, IncludeLabel_Param as variant, UseHeadingStyles_Param as variant, UpperHeadingLevel_Param as variant, LowerHeadingLevel_Param as variant, UseFields_Param as variant, TableID_Param as variant, RightAlignPageNumbers_Param as variant, IncludePageNumbers_Param as variant, AddedStyles_Param as variant, UseHyperlinks_Param as variant, HidePageNumbersInWeb_Param as variant) as WordTableOfFigures
  2160.     Function AddOld(Range_Param as WordRange, Caption_Param as variant, IncludeLabel_Param as variant, UseHeadingStyles_Param as variant, UpperHeadingLevel_Param as variant, LowerHeadingLevel_Param as variant, UseFields_Param as variant, TableID_Param as variant, RightAlignPageNumbers_Param as variant, IncludePageNumbers_Param as variant, AddedStyles_Param as variant) as WordTableOfFigures
  2161.     Function Item(Index_Param as integer) as WordTableOfFigures
  2162.     Function MarkEntry(Range_Param as WordRange, Entry_Param as variant, EntryAutoText_Param as variant, TableID_Param as variant, Level_Param as variant) as WordField
  2163. End Class
  2164.  
  2165. Class WordTableOfFigures
  2166. inherits OLEObject
  2167.     dim Application as WordApplication
  2168.     dim Caption as string
  2169.     dim Creator as integer
  2170.     dim HeadingStyles as WordHeadingStyles
  2171.     dim HidePageNumbersInWeb as boolean
  2172.     dim IncludeLabel as boolean
  2173.     dim IncludePageNumbers as boolean
  2174.     dim LowerHeadingLevel as integer
  2175.     dim Parent as OLEObject
  2176.     dim Range as WordRange
  2177.     dim RightAlignPageNumbers as boolean
  2178.     dim TabLeader as integer
  2179.     dim TableID as string
  2180.     dim UpperHeadingLevel as integer
  2181.     dim UseFields as boolean
  2182.     dim UseHeadingStyles as boolean
  2183.     dim UseHyperlinks as boolean
  2184.     Sub Delete()
  2185.     Sub Update()
  2186.     Sub UpdatePageNumbers()
  2187. End Class
  2188.  
  2189. Class WordMailMerge
  2190. inherits OLEObject
  2191.     dim Application as WordApplication
  2192.     dim Creator as integer
  2193.     dim DataSource as WordMailMergeDataSource
  2194.     dim Destination as integer
  2195.     dim Fields as WordMailMergeFields
  2196.     dim MailAddressFieldName as string
  2197.     dim MailAsAttachment as boolean
  2198.     dim MailSubject as string
  2199.     dim MainDocumentType as integer
  2200.     dim Parent as OLEObject
  2201.     dim State as integer
  2202.     dim SuppressBlankLines as boolean
  2203.     dim ViewMailMergeFieldCodes as integer
  2204.     Sub Check()
  2205.     Sub CreateDataSource(Name_Param as variant, PasswordDocument_Param as variant, WritePasswordDocument_Param as variant, HeaderRecord_Param as variant, MSQuery_Param as variant, SQLStatement_Param as variant, SQLStatement1_Param as variant, Connection_Param as variant, LinkToSource_Param as variant)
  2206.     Sub CreateHeaderSource(Name_Param as string, PasswordDocument_Param as variant, WritePasswordDocument_Param as variant, HeaderRecord_Param as variant)
  2207.     Sub EditDataSource()
  2208.     Sub EditHeaderSource()
  2209.     Sub EditMainDocument()
  2210.     Sub Execute(Pause_Param as variant)
  2211.     Sub OpenDataSource(Name_Param as string, Format_Param as variant, ConfirmConversions_Param as variant, ReadOnly_Param as variant, LinkToSource_Param as variant, AddToRecentFiles_Param as variant, PasswordDocument_Param as variant, PasswordTemplate_Param as variant, Revert_Param as variant, WritePasswordDocument_Param as variant, WritePasswordTemplate_Param as variant, Connection_Param as variant, SQLStatement_Param as variant, SQLStatement1_Param as variant)
  2212.     Sub OpenHeaderSource(Name_Param as string, Format_Param as variant, ConfirmConversions_Param as variant, ReadOnly_Param as variant, AddToRecentFiles_Param as variant, PasswordDocument_Param as variant, PasswordTemplate_Param as variant, Revert_Param as variant, WritePasswordDocument_Param as variant, WritePasswordTemplate_Param as variant)
  2213.     Sub UseAddressBook(Type_Param as string)
  2214. End Class
  2215.  
  2216. Class WordMailMergeFields
  2217. inherits OLEObject
  2218.     dim Application as WordApplication
  2219.     dim Count as integer
  2220.     dim Creator as integer
  2221.     dim Parent as OLEObject
  2222.     dim _NewEnum as OLEObject
  2223.     Function Add(Range_Param as WordRange, Name_Param as string) as WordMailMergeField
  2224.     Function AddAsk(Range_Param as WordRange, Name_Param as string, Prompt_Param as variant, DefaultAskText_Param as variant, AskOnce_Param as variant) as WordMailMergeField
  2225.     Function AddFillIn(Range_Param as WordRange, Prompt_Param as variant, DefaultFillInText_Param as variant, AskOnce_Param as variant) as WordMailMergeField
  2226.     Function AddIf(Range_Param as WordRange, MergeField_Param as string, Comparison_Param as integer, CompareTo_Param as variant, TrueAutoText_Param as variant, TrueText_Param as variant, FalseAutoText_Param as variant, FalseText_Param as variant) as WordMailMergeField
  2227.     Function AddMergeRec(Range_Param as WordRange) as WordMailMergeField
  2228.     Function AddMergeSeq(Range_Param as WordRange) as WordMailMergeField
  2229.     Function AddNext(Range_Param as WordRange) as WordMailMergeField
  2230.     Function AddNextIf(Range_Param as WordRange, MergeField_Param as string, Comparison_Param as integer, CompareTo_Param as variant) as WordMailMergeField
  2231.     Function AddSet(Range_Param as WordRange, Name_Param as string, ValueText_Param as variant, ValueAutoText_Param as variant) as WordMailMergeField
  2232.     Function AddSkipIf(Range_Param as WordRange, MergeField_Param as string, Comparison_Param as integer, CompareTo_Param as variant) as WordMailMergeField
  2233.     Function Item(Index_Param as integer) as WordMailMergeField
  2234. End Class
  2235.  
  2236. Class WordMailMergeField
  2237. inherits OLEObject
  2238.     dim Application as WordApplication
  2239.     dim Code as WordRange
  2240.     dim Creator as integer
  2241.     dim Locked as boolean
  2242.     dim Next_ as WordMailMergeField
  2243.     dim Parent as OLEObject
  2244.     dim Previous as WordMailMergeField
  2245.     dim Type as integer
  2246.     Sub Copy()
  2247.     Sub Cut()
  2248.     Sub Delete()
  2249.     Sub Select_()
  2250. End Class
  2251.  
  2252. Class WordMailMergeDataSource
  2253. inherits OLEObject
  2254.     dim ActiveRecord as integer
  2255.     dim Application as WordApplication
  2256.     dim ConnectString as string
  2257.     dim Creator as integer
  2258.     dim DataFields as WordMailMergeDataFields
  2259.     dim FieldNames as WordMailMergeFieldNames
  2260.     dim FirstRecord as integer
  2261.     dim HeaderSourceName as string
  2262.     dim HeaderSourceType as integer
  2263.     dim LastRecord as integer
  2264.     dim Name as string
  2265.     dim Parent as OLEObject
  2266.     dim QueryString as string
  2267.     dim Type as integer
  2268.     Function FindRecord(FindText_Param as string, Field_Param as string) as boolean
  2269. End Class
  2270.  
  2271. Class WordMailMergeFieldNames
  2272. inherits OLEObject
  2273.     dim Application as WordApplication
  2274.     dim Count as integer
  2275.     dim Creator as integer
  2276.     dim Parent as OLEObject
  2277.     dim _NewEnum as OLEObject
  2278.     Function Item(Index_Param as variant) as WordMailMergeFieldName
  2279. End Class
  2280.  
  2281. Class WordMailMergeFieldName
  2282. inherits OLEObject
  2283.     dim Application as WordApplication
  2284.     dim Creator as integer
  2285.     dim Index as integer
  2286.     dim Name as string
  2287.     dim Parent as OLEObject
  2288. End Class
  2289.  
  2290. Class WordMailMergeDataFields
  2291. inherits OLEObject
  2292.     dim Application as WordApplication
  2293.     dim Count as integer
  2294.     dim Creator as integer
  2295.     dim Parent as OLEObject
  2296.     dim _NewEnum as OLEObject
  2297.     Function Item(Index_Param as variant) as WordMailMergeDataField
  2298. End Class
  2299.  
  2300. Class WordMailMergeDataField
  2301. inherits OLEObject
  2302.     dim Application as WordApplication
  2303.     dim Creator as integer
  2304.     dim Index as integer
  2305.     dim Name as string
  2306.     dim Parent as OLEObject
  2307.     dim Value as string
  2308. End Class
  2309.  
  2310. Class WordEnvelope
  2311. inherits OLEObject
  2312.     dim Address as WordRange
  2313.     dim AddressFromLeft as single
  2314.     dim AddressFromTop as single
  2315.     dim AddressStyle as WordStyle
  2316.     dim Application as WordApplication
  2317.     dim Creator as integer
  2318.     dim DefaultFaceUp as boolean
  2319.     dim DefaultHeight as single
  2320.     dim DefaultOmitReturnAddress as boolean
  2321.     dim DefaultOrientation as integer
  2322.     dim DefaultPrintBarCode as boolean
  2323.     dim DefaultPrintFIMA as boolean
  2324.     dim DefaultSize as string
  2325.     dim DefaultWidth as single
  2326.     dim FeedSource as integer
  2327.     dim Parent as OLEObject
  2328.     dim ReturnAddress as WordRange
  2329.     dim ReturnAddressFromLeft as single
  2330.     dim ReturnAddressFromTop as single
  2331.     dim ReturnAddressStyle as WordStyle
  2332.     Sub Insert(ExtractAddress_Param as variant, Address_Param as variant, AutoText_Param as variant, OmitReturnAddress_Param as variant, ReturnAddress_Param as variant, ReturnAutoText_Param as variant, PrintBarCode_Param as variant, PrintFIMA_Param as variant, Size_Param as variant, Height_Param as variant, Width_Param as variant, FeedSource_Param as variant, AddressFromLeft_Param as variant, AddressFromTop_Param as variant, ReturnAddressFromLeft_Param as variant, ReturnAddressFromTop_Param as variant, DefaultFaceUp_Param as variant, DefaultOrientation_Param as variant)
  2333.     Sub PrintOut(ExtractAddress_Param as variant, Address_Param as variant, AutoText_Param as variant, OmitReturnAddress_Param as variant, ReturnAddress_Param as variant, ReturnAutoText_Param as variant, PrintBarCode_Param as variant, PrintFIMA_Param as variant, Size_Param as variant, Height_Param as variant, Width_Param as variant, FeedSource_Param as variant, AddressFromLeft_Param as variant, AddressFromTop_Param as variant, ReturnAddressFromLeft_Param as variant, ReturnAddressFromTop_Param as variant, DefaultFaceUp_Param as variant, DefaultOrientation_Param as variant)
  2334.     Sub UpdateDocument()
  2335. End Class
  2336.  
  2337. Class WordMailingLabel
  2338. inherits OLEObject
  2339.     dim Application as WordApplication
  2340.     dim Creator as integer
  2341.     dim CustomLabels as WordCustomLabels
  2342.     dim DefaultLabelName as string
  2343.     dim DefaultLaserTray as integer
  2344.     dim DefaultPrintBarCode as boolean
  2345.     dim Parent as OLEObject
  2346.     Function CreateNewDocument(Name_Param as variant, Address_Param as variant, AutoText_Param as variant, ExtractAddress_Param as variant, LaserTray_Param as variant) as WordDocument
  2347.     Sub PrintOut(Name_Param as variant, Address_Param as variant, ExtractAddress_Param as variant, LaserTray_Param as variant, SingleLabel_Param as variant, Row_Param as variant, Column_Param as variant)
  2348. End Class
  2349.  
  2350. Class WordCustomLabels
  2351. inherits OLEObject
  2352.     dim Application as WordApplication
  2353.     dim Count as integer
  2354.     dim Creator as integer
  2355.     dim Parent as OLEObject
  2356.     dim _NewEnum as OLEObject
  2357.     Function Add(Name_Param as string, DotMatrix_Param as variant) as WordCustomLabel
  2358.     Function Item(Index_Param as variant) as WordCustomLabel
  2359. End Class
  2360.  
  2361. Class WordCustomLabel
  2362. inherits OLEObject
  2363.     dim Application as WordApplication
  2364.     dim Creator as integer
  2365.     dim DotMatrix as boolean
  2366.     dim Height as single
  2367.     dim HorizontalPitch as single
  2368.     dim Index as integer
  2369.     dim Name as string
  2370.     dim NumberAcross as integer
  2371.     dim NumberDown as integer
  2372.     dim PageSize as integer
  2373.     dim Parent as OLEObject
  2374.     dim SideMargin as single
  2375.     dim TopMargin as single
  2376.     dim Valid as boolean
  2377.     dim VerticalPitch as single
  2378.     dim Width as single
  2379.     Sub Delete()
  2380. End Class
  2381.  
  2382. Class WordTablesOfContents
  2383. inherits OLEObject
  2384.     dim Application as WordApplication
  2385.     dim Count as integer
  2386.     dim Creator as integer
  2387.     dim Format as integer
  2388.     dim Parent as OLEObject
  2389.     dim _NewEnum as OLEObject
  2390.     Function Add(Range_Param as WordRange, UseHeadingStyles_Param as variant, UpperHeadingLevel_Param as variant, LowerHeadingLevel_Param as variant, UseFields_Param as variant, TableID_Param as variant, RightAlignPageNumbers_Param as variant, IncludePageNumbers_Param as variant, AddedStyles_Param as variant, UseHyperlinks_Param as variant, HidePageNumbersInWeb_Param as variant) as WordTableOfContents
  2391.     Function AddOld(Range_Param as WordRange, UseHeadingStyles_Param as variant, UpperHeadingLevel_Param as variant, LowerHeadingLevel_Param as variant, UseFields_Param as variant, TableID_Param as variant, RightAlignPageNumbers_Param as variant, IncludePageNumbers_Param as variant, AddedStyles_Param as variant) as WordTableOfContents
  2392.     Function Item(Index_Param as integer) as WordTableOfContents
  2393.     Function MarkEntry(Range_Param as WordRange, Entry_Param as variant, EntryAutoText_Param as variant, TableID_Param as variant, Level_Param as variant) as WordField
  2394. End Class
  2395.  
  2396. Class WordTableOfContents
  2397. inherits OLEObject
  2398.     dim Application as WordApplication
  2399.     dim Creator as integer
  2400.     dim HeadingStyles as WordHeadingStyles
  2401.     dim HidePageNumbersInWeb as boolean
  2402.     dim IncludePageNumbers as boolean
  2403.     dim LowerHeadingLevel as integer
  2404.     dim Parent as OLEObject
  2405.     dim Range as WordRange
  2406.     dim RightAlignPageNumbers as boolean
  2407.     dim TabLeader as integer
  2408.     dim TableID as string
  2409.     dim UpperHeadingLevel as integer
  2410.     dim UseFields as boolean
  2411.     dim UseHeadingStyles as boolean
  2412.     dim UseHyperlinks as boolean
  2413.     Sub Delete()
  2414.     Sub Update()
  2415.     Sub UpdatePageNumbers()
  2416. End Class
  2417.  
  2418. Class WordTablesOfAuthorities
  2419. inherits OLEObject
  2420.     dim Application as WordApplication
  2421.     dim Count as integer
  2422.     dim Creator as integer
  2423.     dim Format as integer
  2424.     dim Parent as OLEObject
  2425.     dim _NewEnum as OLEObject
  2426.     Function Add(Range_Param as WordRange, Category_Param as variant, Bookmark_Param as variant, Passim_Param as variant, KeepEntryFormatting_Param as variant, Separator_Param as variant, IncludeSequenceName_Param as variant, EntrySeparator_Param as variant, PageRangeSeparator_Param as variant, IncludeCategoryHeader_Param as variant, PageNumberSeparator_Param as variant) as WordTableOfAuthorities
  2427.     Function Item(Index_Param as integer) as WordTableOfAuthorities
  2428.     Sub MarkAllCitations(ShortCitation_Param as string, LongCitation_Param as variant, LongCitationAutoText_Param as variant, Category_Param as variant)
  2429.     Function MarkCitation(Range_Param as WordRange, ShortCitation_Param as string, LongCitation_Param as variant, LongCitationAutoText_Param as variant, Category_Param as variant) as WordField
  2430.     Sub NextCitation(ShortCitation_Param as string)
  2431. End Class
  2432.  
  2433. Class WordTableOfAuthorities
  2434. inherits OLEObject
  2435.     dim Application as WordApplication
  2436.     dim Bookmark as string
  2437.     dim Category as integer
  2438.     dim Creator as integer
  2439.     dim EntrySeparator as string
  2440.     dim IncludeCategoryHeader as boolean
  2441.     dim IncludeSequenceName as string
  2442.     dim KeepEntryFormatting as boolean
  2443.     dim PageNumberSeparator as string
  2444.     dim PageRangeSeparator as string
  2445.     dim Parent as OLEObject
  2446.     dim Passim as boolean
  2447.     dim Range as WordRange
  2448.     dim Separator as string
  2449.     dim TabLeader as integer
  2450.     Sub Delete()
  2451.     Sub Update()
  2452. End Class
  2453.  
  2454. Class WordDialogs
  2455. inherits OLEObject
  2456.     dim Application as WordApplication
  2457.     dim Count as integer
  2458.     dim Creator as integer
  2459.     dim Parent as OLEObject
  2460.     dim _NewEnum as OLEObject
  2461.     Function Item(Index_Param as integer) as WordDialog
  2462. End Class
  2463.  
  2464. Class WordDialog
  2465. inherits OLEObject
  2466.     dim Application as WordApplication
  2467.     dim CommandName as string
  2468.     dim Creator as integer
  2469.     dim DefaultTab as integer
  2470.     dim Parent as OLEObject
  2471.     dim Type as integer
  2472.     Function Display(TimeOut_Param as variant) as integer
  2473.     Sub Execute()
  2474.     Function Show(TimeOut_Param as variant) as integer
  2475.     Sub Update()
  2476. End Class
  2477.  
  2478. Class WordPageSetup
  2479. inherits OLEObject
  2480.     dim Application as WordApplication
  2481.     dim BottomMargin as single
  2482.     dim CharsLine as single
  2483.     dim Creator as integer
  2484.     dim DifferentFirstPageHeaderFooter as integer
  2485.     dim FirstPageTray as integer
  2486.     dim FooterDistance as single
  2487.     dim Gutter as single
  2488.     dim GutterOnTop as boolean
  2489.     dim GutterPos as integer
  2490.     dim GutterStyle as integer
  2491.     dim HeaderDistance as single
  2492.     dim LayoutMode as integer
  2493.     dim LeftMargin as single
  2494.     dim LineNumbering as WordLineNumbering
  2495.     dim LinesPage as single
  2496.     dim MirrorMargins as integer
  2497.     dim OddAndEvenPagesHeaderFooter as integer
  2498.     dim Orientation as integer
  2499.     dim OtherPagesTray as integer
  2500.     dim PageHeight as single
  2501.     dim PageWidth as single
  2502.     dim PaperSize as integer
  2503.     dim Parent as OLEObject
  2504.     dim RightMargin as single
  2505.     dim SectionDirection as integer
  2506.     dim SectionStart as integer
  2507.     dim ShowGrid as boolean
  2508.     dim SuppressEndnotes as integer
  2509.     dim TextColumns as WordTextColumns
  2510.     dim TopMargin as single
  2511.     dim TwoPagesOnOne as boolean
  2512.     dim VerticalAlignment as integer
  2513.     Sub SetAsTemplateDefault()
  2514.     Sub TogglePortrait()
  2515. End Class
  2516.  
  2517. Class WordLineNumbering
  2518. inherits OLEObject
  2519.     dim Active as integer
  2520.     dim Application as WordApplication
  2521.     dim CountBy as integer
  2522.     dim Creator as integer
  2523.     dim DistanceFromText as single
  2524.     dim Parent as OLEObject
  2525.     dim RestartMode as integer
  2526.     dim StartingNumber as integer
  2527. End Class
  2528.  
  2529. Class WordTextColumns
  2530. inherits OLEObject
  2531.     dim Application as WordApplication
  2532.     dim Count as integer
  2533.     dim Creator as integer
  2534.     dim EvenlySpaced as integer
  2535.     dim FlowDirection as integer
  2536.     dim LineBetween as integer
  2537.     dim Parent as OLEObject
  2538.     dim Spacing as single
  2539.     dim Width as single
  2540.     dim _NewEnum as OLEObject
  2541.     Function Add(Width_Param as variant, Spacing_Param as variant, EvenlySpaced_Param as variant) as WordTextColumn
  2542.     Function Item(Index_Param as integer) as WordTextColumn
  2543.     Sub SetCount(NumColumns_Param as integer)
  2544. End Class
  2545.  
  2546. Class WordTextColumn
  2547. inherits OLEObject
  2548.     dim Application as WordApplication
  2549.     dim Creator as integer
  2550.     dim Parent as OLEObject
  2551.     dim SpaceAfter as single
  2552.     dim Width as single
  2553. End Class
  2554.  
  2555. Class WordSelection
  2556. inherits OLEObject
  2557.     dim Active as boolean
  2558.     dim Application as WordApplication
  2559.     dim BookmarkID as integer
  2560.     dim Bookmarks as WordBookmarks
  2561.     dim Borders as WordBorders
  2562.     dim Cells as WordCells
  2563.     dim Characters as WordCharacters
  2564.     dim Columns as WordColumns
  2565.     dim ColumnSelectMode as boolean
  2566.     dim Comments as WordComments
  2567.     dim Creator as integer
  2568.     dim Document as WordDocument
  2569.     dim End_ as integer
  2570.     dim Endnotes as WordEndnotes
  2571.     dim ExtendMode as boolean
  2572.     dim Fields as WordFields
  2573.     dim Find as WordFind
  2574.     dim FitTextWidth as single
  2575.     dim Flags as integer
  2576.     dim Font as WordFont
  2577.     dim Footnotes as WordFootnotes
  2578.     dim FormattedText as WordRange
  2579.     dim FormFields as WordFormFields
  2580.     dim Frames as WordFrames
  2581.     dim HeaderFooter as WordHeaderFooter
  2582.     dim Hyperlinks as WordHyperlinks
  2583.     dim InlineShapes as WordInlineShapes
  2584.     dim IPAtEndOfLine as boolean
  2585.     dim IsEndOfRowMark as boolean
  2586.     dim LanguageDetected as boolean
  2587.     dim LanguageID as integer
  2588.     dim LanguageIDFarEast as integer
  2589.     dim LanguageIDOther as integer
  2590.     dim NoProofing as integer
  2591.     dim Orientation as integer
  2592.     dim PageSetup as WordPageSetup
  2593.     dim ParagraphFormat as WordParagraphFormat
  2594.     dim Paragraphs as WordParagraphs
  2595.     dim Parent as OLEObject
  2596.     dim PreviousBookmarkID as integer
  2597.     dim Range as WordRange
  2598.     dim Rows as WordRows
  2599.     dim Sections as WordSections
  2600.     dim Sentences as WordSentences
  2601.     dim Shading as WordShading
  2602.     dim ShapeRange as WordShapeRange
  2603.     dim Start as integer
  2604.     dim StartIsActive as boolean
  2605.     dim StoryLength as integer
  2606.     dim StoryType as integer
  2607.     dim Style as variant
  2608.     dim Tables as WordTables
  2609.     dim Text as string
  2610.     dim TopLevelTables as WordTables
  2611.     dim Type as integer
  2612.     dim Words as WordWords
  2613.     Sub BoldRun()
  2614.     Function Calculate() as single
  2615.     Sub Collapse(Direction_Param as variant)
  2616.     Function ConvertToTable(Separator_Param as variant, NumRows_Param as variant, NumColumns_Param as variant, InitialColumnWidth_Param as variant, Format_Param as variant, ApplyBorders_Param as variant, ApplyShading_Param as variant, ApplyFont_Param as variant, ApplyColor_Param as variant, ApplyHeadingRows_Param as variant, ApplyLastRow_Param as variant, ApplyFirstColumn_Param as variant, ApplyLastColumn_Param as variant, AutoFit_Param as variant, AutoFitBehavior_Param as variant, DefaultTableBehavior_Param as variant) as WordTable
  2617.     Function ConvertToTableOld(Separator_Param as variant, NumRows_Param as variant, NumColumns_Param as variant, InitialColumnWidth_Param as variant, Format_Param as variant, ApplyBorders_Param as variant, ApplyShading_Param as variant, ApplyFont_Param as variant, ApplyColor_Param as variant, ApplyHeadingRows_Param as variant, ApplyLastRow_Param as variant, ApplyFirstColumn_Param as variant, ApplyLastColumn_Param as variant, AutoFit_Param as variant) as WordTable
  2618.     Sub Copy()
  2619.     Sub CopyAsPicture()
  2620.     Sub CopyFormat()
  2621.     Function CreateAutoTextEntry(Name_Param as string, StyleName_Param as string) as WordAutoTextEntry
  2622.     Sub CreateTextbox()
  2623.     Sub Cut()
  2624.     Function Delete(Unit_Param as variant, Count_Param as variant) as integer
  2625.     Sub DetectLanguage()
  2626.     Function EndKey(Unit_Param as variant, Extend_Param as variant) as integer
  2627.     Function EndOf(Unit_Param as variant, Extend_Param as variant) as integer
  2628.     Sub EscapeKey()
  2629.     Function Expand(Unit_Param as variant) as integer
  2630.     Sub Extend(Character_Param as variant)
  2631.     Function GoTo_(What_Param as variant, Which_Param as variant, Count_Param as variant, Name_Param as variant) as WordRange
  2632.     Function GoToNext(What_Param as integer) as WordRange
  2633.     Function GoToPrevious(What_Param as integer) as WordRange
  2634.     Function HomeKey(Unit_Param as variant, Extend_Param as variant) as integer
  2635.     Function Information(Type_Param as integer) as variant
  2636.     Function InRange(Range_Param as WordRange) as boolean
  2637.     Sub InsertAfter(Text_Param as string)
  2638.     Sub InsertBefore(Text_Param as string)
  2639.     Sub InsertBreak(Type_Param as variant)
  2640.     Sub InsertCaption(Label_Param as variant, Title_Param as variant, TitleAutoText_Param as variant, Position_Param as variant)
  2641.     Sub InsertCells(ShiftCells_Param as variant)
  2642.     Sub InsertColumns()
  2643.     Sub InsertColumnsRight()
  2644.     Sub InsertCrossReference(ReferenceType_Param as variant, ReferenceKind_Param as integer, ReferenceItem_Param as variant, InsertAsHyperlink_Param as variant, IncludePosition_Param as variant)
  2645.     Sub InsertDateTime(DateTimeFormat_Param as variant, InsertAsField_Param as variant, InsertAsFullWidth_Param as variant, DateLanguage_Param as variant, CalendarType_Param as variant)
  2646.     Sub InsertDateTimeOld(DateTimeFormat_Param as variant, InsertAsField_Param as variant, InsertAsFullWidth_Param as variant)
  2647.     Sub InsertFile(FileName_Param as string, Range_Param as variant, ConfirmConversions_Param as variant, Link_Param as variant, Attachment_Param as variant)
  2648.     Sub InsertFormula(Formula_Param as variant, NumberFormat_Param as variant)
  2649.     Sub InsertParagraph()
  2650.     Sub InsertParagraphAfter()
  2651.     Sub InsertParagraphBefore()
  2652.     Sub InsertRows(NumRows_Param as variant)
  2653.     Sub InsertRowsAbove(NumRows_Param as variant)
  2654.     Sub InsertRowsBelow(NumRows_Param as variant)
  2655.     Sub InsertSymbol(CharacterNumber_Param as integer, Font_Param as variant, Unicode_Param as variant, Bias_Param as variant)
  2656.     Function InStory(Range_Param as WordRange) as boolean
  2657.     Function IsEqual(Range_Param as WordRange) as boolean
  2658.     Sub ItalicRun()
  2659.     Sub LtrPara()
  2660.     Sub LtrRun()
  2661.     Function Move(Unit_Param as variant, Count_Param as variant) as integer
  2662.     Function MoveDown(Unit_Param as variant, Count_Param as variant, Extend_Param as variant) as integer
  2663.     Function MoveEnd(Unit_Param as variant, Count_Param as variant) as integer
  2664.     Function MoveEndUntil(Cset_Param as variant, Count_Param as variant) as integer
  2665.     Function MoveEndWhile(Cset_Param as variant, Count_Param as variant) as integer
  2666.     Function MoveLeft(Unit_Param as variant, Count_Param as variant, Extend_Param as variant) as integer
  2667.     Function MoveRight(Unit_Param as variant, Count_Param as variant, Extend_Param as variant) as integer
  2668.     Function MoveStart(Unit_Param as variant, Count_Param as variant) as integer
  2669.     Function MoveStartUntil(Cset_Param as variant, Count_Param as variant) as integer
  2670.     Function MoveStartWhile(Cset_Param as variant, Count_Param as variant) as integer
  2671.     Function MoveUntil(Cset_Param as variant, Count_Param as variant) as integer
  2672.     Function MoveUp(Unit_Param as variant, Count_Param as variant, Extend_Param as variant) as integer
  2673.     Function MoveWhile(Cset_Param as variant, Count_Param as variant) as integer
  2674.     Function Next_(Unit_Param as variant, Count_Param as variant) as WordRange
  2675.     Function NextField() as WordField
  2676.     Function NextRevision(Wrap_Param as variant) as WordRevision
  2677.     Sub NextSubdocument()
  2678.     Sub Paste()
  2679.     Sub PasteAsNestedTable()
  2680.     Sub PasteFormat()
  2681.     Sub PasteSpecial(IconIndex_Param as variant, Link_Param as variant, Placement_Param as variant, DisplayAsIcon_Param as variant, DataType_Param as variant, IconFileName_Param as variant, IconLabel_Param as variant)
  2682.     Function Previous(Unit_Param as variant, Count_Param as variant) as WordRange
  2683.     Function PreviousField() as WordField
  2684.     Function PreviousRevision(Wrap_Param as variant) as WordRevision
  2685.     Sub PreviousSubdocument()
  2686.     Sub RtlPara()
  2687.     Sub RtlRun()
  2688.     Sub Select_()
  2689.     Sub SelectCell()
  2690.     Sub SelectColumn()
  2691.     Sub SelectCurrentAlignment()
  2692.     Sub SelectCurrentColor()
  2693.     Sub SelectCurrentFont()
  2694.     Sub SelectCurrentIndent()
  2695.     Sub SelectCurrentSpacing()
  2696.     Sub SelectCurrentTabs()
  2697.     Sub SelectRow()
  2698.     Sub SetRange(Start_Param as integer, End_Param as integer)
  2699.     Sub Shrink()
  2700.     Sub Sort(ExcludeHeader_Param as variant, FieldNumber_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, FieldNumber2_Param as variant, SortFieldType2_Param as variant, SortOrder2_Param as variant, FieldNumber3_Param as variant, SortFieldType3_Param as variant, SortOrder3_Param as variant, SortColumn_Param as variant, Separator_Param as variant, CaseSensitive_Param as variant, BidiSort_Param as variant, IgnoreThe_Param as variant, IgnoreKashida_Param as variant, IgnoreDiacritics_Param as variant, IgnoreHe_Param as variant, LanguageID_Param as variant)
  2701.     Sub SortAscending()
  2702.     Sub SortDescending()
  2703.     Sub SortOld(ExcludeHeader_Param as variant, FieldNumber_Param as variant, SortFieldType_Param as variant, SortOrder_Param as variant, FieldNumber2_Param as variant, SortFieldType2_Param as variant, SortOrder2_Param as variant, FieldNumber3_Param as variant, SortFieldType3_Param as variant, SortOrder3_Param as variant, SortColumn_Param as variant, Separator_Param as variant, CaseSensitive_Param as variant, LanguageID_Param as variant)
  2704.     Sub SplitTable()
  2705.     Function StartOf(Unit_Param as variant, Extend_Param as variant) as integer
  2706.     Sub TypeBackspace()
  2707.     Sub TypeParagraph()
  2708.     Sub TypeText(Text_Param as string)
  2709.     Sub WholeStory()
  2710. End Class
  2711.  
  2712. Class WordTablesOfAuthoritiesCategories
  2713. inherits OLEObject
  2714.     dim Application as WordApplication
  2715.     dim Count as integer
  2716.     dim Creator as integer
  2717.     dim Parent as OLEObject
  2718.     dim _NewEnum as OLEObject
  2719.     Function Item(Index_Param as variant) as WordTableOfAuthoritiesCategory
  2720. End Class
  2721.  
  2722. Class WordTableOfAuthoritiesCategory
  2723. inherits OLEObject
  2724.     dim Application as WordApplication
  2725.     dim Creator as integer
  2726.     dim Index as integer
  2727.     dim Name as string
  2728.     dim Parent as OLEObject
  2729. End Class
  2730.  
  2731. Class WordCaptionLabels
  2732. inherits OLEObject
  2733.     dim Application as WordApplication
  2734.     dim Count as integer
  2735.     dim Creator as integer
  2736.     dim Parent as OLEObject
  2737.     dim _NewEnum as OLEObject
  2738.     Function Add(Name_Param as string) as WordCaptionLabel
  2739.     Function Item(Index_Param as variant) as WordCaptionLabel
  2740. End Class
  2741.  
  2742. Class WordCaptionLabel
  2743. inherits OLEObject
  2744.     dim Application as WordApplication
  2745.     dim BuiltIn as boolean
  2746.     dim ChapterStyleLevel as integer
  2747.     dim Creator as integer
  2748.     dim ID as integer
  2749.     dim IncludeChapterNumber as boolean
  2750.     dim Name as string
  2751.     dim NumberStyle as integer
  2752.     dim Parent as OLEObject
  2753.     dim Position as integer
  2754.     dim Separator as integer
  2755.     Sub Delete()
  2756. End Class
  2757.  
  2758. Class WordAutoCaptions
  2759. inherits OLEObject
  2760.     dim Application as WordApplication
  2761.     dim Count as integer
  2762.     dim Creator as integer
  2763.     dim Parent as OLEObject
  2764.     dim _NewEnum as OLEObject
  2765.     Sub CancelAutoInsert()
  2766.     Function Item(Index_Param as variant) as WordAutoCaption
  2767. End Class
  2768.  
  2769. Class WordAutoCaption
  2770. inherits OLEObject
  2771.     dim Application as WordApplication
  2772.     dim AutoInsert as boolean
  2773.     dim CaptionLabel as variant
  2774.     dim Creator as integer
  2775.     dim Index as integer
  2776.     dim Name as string
  2777.     dim Parent as OLEObject
  2778. End Class
  2779.  
  2780. Class WordIndexes
  2781. inherits OLEObject
  2782.     dim Application as WordApplication
  2783.     dim Count as integer
  2784.     dim Creator as integer
  2785.     dim Format as integer
  2786.     dim Parent as OLEObject
  2787.     dim _NewEnum as OLEObject
  2788.     Function Add(Range_Param as WordRange, HeadingSeparator_Param as variant, RightAlignPageNumbers_Param as variant, Type_Param as variant, NumberOfColumns_Param as variant, AccentedLetters_Param as variant, SortBy_Param as variant, IndexLanguage_Param as variant) as WordIndex
  2789.     Function AddOld(Range_Param as WordRange, HeadingSeparator_Param as variant, RightAlignPageNumbers_Param as variant, Type_Param as variant, NumberOfColumns_Param as variant, AccentedLetters_Param as variant) as WordIndex
  2790.     Sub AutoMarkEntries(ConcordanceFileName_Param as string)
  2791.     Function Item(Index_Param as integer) as WordIndex
  2792.     Sub MarkAllEntries(Range_Param as WordRange, Entry_Param as variant, EntryAutoText_Param as variant, CrossReference_Param as variant, CrossReferenceAutoText_Param as variant, BookmarkName_Param as variant, Bold_Param as variant, Italic_Param as variant)
  2793.     Function MarkEntry(Range_Param as WordRange, Entry_Param as variant, EntryAutoText_Param as variant, CrossReference_Param as variant, CrossReferenceAutoText_Param as variant, BookmarkName_Param as variant, Bold_Param as variant, Italic_Param as variant, Reading_Param as variant) as WordField
  2794. End Class
  2795.  
  2796. Class WordIndex
  2797. inherits OLEObject
  2798.     dim AccentedLetters as boolean
  2799.     dim Application as WordApplication
  2800.     dim Creator as integer
  2801.     dim Filter as integer
  2802.     dim HeadingSeparator as integer
  2803.     dim IndexLanguage as integer
  2804.     dim NumberOfColumns as integer
  2805.     dim Parent as OLEObject
  2806.     dim Range as WordRange
  2807.     dim RightAlignPageNumbers as boolean
  2808.     dim SortBy as integer
  2809.     dim TabLeader as integer
  2810.     dim Type as integer
  2811.     Sub Delete()
  2812.     Sub Update()
  2813. End Class
  2814.  
  2815. Class WordAddIn
  2816. inherits OLEObject
  2817.     dim Application as WordApplication
  2818.     dim Autoload as boolean
  2819.     dim Compiled as boolean
  2820.     dim Creator as integer
  2821.     dim Index as integer
  2822.     dim Installed as boolean
  2823.     dim Name as string
  2824.     dim Parent as OLEObject
  2825.     dim Path as string
  2826.     Sub Delete()
  2827. End Class
  2828.  
  2829. Class WordAddIns
  2830. inherits OLEObject
  2831.     dim Application as WordApplication
  2832.     dim Count as integer
  2833.     dim Creator as integer
  2834.     dim Parent as OLEObject
  2835.     dim _NewEnum as OLEObject
  2836.     Function Add(FileName_Param as string, Install_Param as variant) as WordAddIn
  2837.     Function Item(Index_Param as variant) as WordAddIn
  2838.     Sub Unload(RemoveFromList_Param as boolean)
  2839. End Class
  2840.  
  2841. Class WordRevisions
  2842. inherits OLEObject
  2843.     dim Application as WordApplication
  2844.     dim Count as integer
  2845.     dim Creator as integer
  2846.     dim Parent as OLEObject
  2847.     dim _NewEnum as OLEObject
  2848.     Sub AcceptAll()
  2849.     Function Item(Index_Param as integer) as WordRevision
  2850.     Sub RejectAll()
  2851. End Class
  2852.  
  2853. Class WordRevision
  2854. inherits OLEObject
  2855.     dim Application as WordApplication
  2856.     dim Author as string
  2857.     dim Creator as integer
  2858.     dim Date as variant
  2859.     dim Index as integer
  2860.     dim Parent as OLEObject
  2861.     dim Range as WordRange
  2862.     dim Type as integer
  2863.     Sub Accept()
  2864.     Sub Reject()
  2865. End Class
  2866.  
  2867. Class WordTask
  2868. inherits OLEObject
  2869.     dim Application as WordApplication
  2870.     dim Creator as integer
  2871.     dim Height as integer
  2872.     dim Left as integer
  2873.     dim Name as string
  2874.     dim Parent as OLEObject
  2875.     dim Top as integer
  2876.     dim Visible as boolean
  2877.     dim Width as integer
  2878.     dim WindowState as integer
  2879.     Sub Activate(Wait_Param as variant)
  2880.     Sub Close()
  2881.     Sub Move(Left_Param as integer, Top_Param as integer)
  2882.     Sub Resize(Width_Param as integer, Height_Param as integer)
  2883.     Sub SendWindowMessage(Message_Param as integer, wParam_Param as integer, lParam_Param as integer)
  2884. End Class
  2885.  
  2886. Class WordTasks
  2887. inherits OLEObject
  2888.     dim Application as WordApplication
  2889.     dim Count as integer
  2890.     dim Creator as integer
  2891.     dim Parent as OLEObject
  2892.     dim _NewEnum as OLEObject
  2893.     Function Exists(Name_Param as string) as boolean
  2894.     Sub ExitWindows()
  2895.     Function Item(Index_Param as variant) as WordTask
  2896. End Class
  2897.  
  2898. Class WordHeadersFooters
  2899. inherits OLEObject
  2900.     dim Application as WordApplication
  2901.     dim Count as integer
  2902.     dim Creator as integer
  2903.     dim Parent as OLEObject
  2904.     dim _NewEnum as OLEObject
  2905.     Function Item(Index_Param as integer) as WordHeaderFooter
  2906. End Class
  2907.  
  2908. Class WordHeaderFooter
  2909. inherits OLEObject
  2910.     dim Application as WordApplication
  2911.     dim Creator as integer
  2912.     dim Exists as boolean
  2913.     dim Index as integer
  2914.     dim IsHeader as boolean
  2915.     dim LinkToPrevious as boolean
  2916.     dim PageNumbers as WordPageNumbers
  2917.     dim Parent as OLEObject
  2918.     dim Range as WordRange
  2919.     dim Shapes as WordShapes
  2920. End Class
  2921.  
  2922. Class WordPageNumbers
  2923. inherits OLEObject
  2924.     dim Application as WordApplication
  2925.     dim ChapterPageSeparator as integer
  2926.     dim Count as integer
  2927.     dim Creator as integer
  2928.     dim DoubleQuote as boolean
  2929.     dim HeadingLevelForChapter as integer
  2930.     dim IncludeChapterNumber as boolean
  2931.     dim NumberStyle as integer
  2932.     dim Parent as OLEObject
  2933.     dim RestartNumberingAtSection as boolean
  2934.     dim ShowFirstPageNumber as boolean
  2935.     dim StartingNumber as integer
  2936.     dim _NewEnum as OLEObject
  2937.     Function Add(PageNumberAlignment_Param as variant, FirstPage_Param as variant) as WordPageNumber
  2938.     Function Item(Index_Param as integer) as WordPageNumber
  2939. End Class
  2940.  
  2941. Class WordPageNumber
  2942. inherits OLEObject
  2943.     dim Alignment as integer
  2944.     dim Application as WordApplication
  2945.     dim Creator as integer
  2946.     dim Index as integer
  2947.     dim Parent as OLEObject
  2948.     Sub Copy()
  2949.     Sub Cut()
  2950.     Sub Delete()
  2951.     Sub Select_()
  2952. End Class
  2953.  
  2954. Class WordSubdocuments
  2955. inherits OLEObject
  2956.     dim Application as WordApplication
  2957.     dim Count as integer
  2958.     dim Creator as integer
  2959.     dim Expanded as boolean
  2960.     dim Parent as OLEObject
  2961.     dim _NewEnum as OLEObject
  2962.     Function AddFromFile(Name_Param as variant, ConfirmConversions_Param as variant, ReadOnly_Param as variant, PasswordDocument_Param as variant, PasswordTemplate_Param as variant, Revert_Param as variant, WritePasswordDocument_Param as variant, WritePasswordTemplate_Param as variant) as WordSubdocument
  2963.     Function AddFromRange(Range_Param as WordRange) as WordSubdocument
  2964.     Sub Delete()
  2965.     Function Item(Index_Param as integer) as WordSubdocument
  2966.     Sub Merge(FirstSubdocument_Param as variant, LastSubdocument_Param as variant)
  2967.     Sub Select_()
  2968. End Class
  2969.  
  2970. Class WordSubdocument
  2971. inherits OLEObject
  2972.     dim Application as WordApplication
  2973.     dim Creator as integer
  2974.     dim HasFile as boolean
  2975.     dim Level as integer
  2976.     dim Locked as boolean
  2977.     dim Name as string
  2978.     dim Parent as OLEObject
  2979.     dim Path as string
  2980.     dim Range as WordRange
  2981.     Sub Delete()
  2982.     Function Open() as WordDocument
  2983.     Sub Split(Range_Param as WordRange)
  2984. End Class
  2985.  
  2986. Class WordHeadingStyles
  2987. inherits OLEObject
  2988.     dim Application as WordApplication
  2989.     dim Count as integer
  2990.     dim Creator as integer
  2991.     dim Parent as OLEObject
  2992.     dim _NewEnum as OLEObject
  2993.     Function Add(Style_Param as variant, Level_Param as integer) as WordHeadingStyle
  2994.     Function Item(Index_Param as integer) as WordHeadingStyle
  2995. End Class
  2996.  
  2997. Class WordHeadingStyle
  2998. inherits OLEObject
  2999.     dim Application as WordApplication
  3000.     dim Creator as integer
  3001.     dim Level as integer
  3002.     dim Parent as OLEObject
  3003.     dim Style as variant
  3004.     Sub Delete()
  3005. End Class
  3006.  
  3007. Class WordStoryRanges
  3008. inherits OLEObject
  3009.     dim Application as WordApplication
  3010.     dim Count as integer
  3011.     dim Creator as integer
  3012.     dim Parent as OLEObject
  3013.     dim _NewEnum as OLEObject
  3014.     Function Item(Index_Param as integer) as WordRange
  3015. End Class
  3016.  
  3017. Class WordListLevel
  3018. inherits OLEObject
  3019.     dim Alignment as integer
  3020.     dim Application as WordApplication
  3021.     dim Creator as integer
  3022.     dim Font as WordFont
  3023.     dim Index as integer
  3024.     dim LinkedStyle as string
  3025.     dim NumberFormat as string
  3026.     dim NumberPosition as single
  3027.     dim NumberStyle as integer
  3028.     dim Parent as OLEObject
  3029.     dim ResetOnHigher as integer
  3030.     dim ResetOnHigherOld as boolean
  3031.     dim StartAt as integer
  3032.     dim TabPosition as single
  3033.     dim TextPosition as single
  3034.     dim TrailingCharacter as integer
  3035. End Class
  3036.  
  3037. Class WordListLevels
  3038. inherits OLEObject
  3039.     dim Application as WordApplication
  3040.     dim Count as integer
  3041.     dim Creator as integer
  3042.     dim Parent as OLEObject
  3043.     dim _NewEnum as OLEObject
  3044.     Function Item(Index_Param as integer) as WordListLevel
  3045. End Class
  3046.  
  3047. Class WordListTemplate
  3048. inherits OLEObject
  3049.     dim Application as WordApplication
  3050.     dim Creator as integer
  3051.     dim ListLevels as WordListLevels
  3052.     dim Name as string
  3053.     dim OutlineNumbered as boolean
  3054.     dim Parent as OLEObject
  3055.     Function Convert(Level_Param as variant) as WordListTemplate
  3056. End Class
  3057.  
  3058. Class WordListTemplates
  3059. inherits OLEObject
  3060.     dim Application as WordApplication
  3061.     dim Count as integer
  3062.     dim Creator as integer
  3063.     dim Parent as OLEObject
  3064.     dim _NewEnum as OLEObject
  3065.     Function Add(OutlineNumbered_Param as variant, Name_Param as variant) as WordListTemplate
  3066.     Function Item(Index_Param as variant) as WordListTemplate
  3067. End Class
  3068.  
  3069. Class WordListParagraphs
  3070. inherits OLEObject
  3071.     dim Application as WordApplication
  3072.     dim Count as integer
  3073.     dim Creator as integer
  3074.     dim Parent as OLEObject
  3075.     dim _NewEnum as OLEObject
  3076.     Function Item(Index_Param as integer) as WordParagraph
  3077. End Class
  3078.  
  3079. Class WordList
  3080. inherits OLEObject
  3081.     dim Application as WordApplication
  3082.     dim Creator as integer
  3083.     dim ListParagraphs as WordListParagraphs
  3084.     dim Parent as OLEObject
  3085.     dim Range as WordRange
  3086.     dim SingleListTemplate as boolean
  3087.     Sub ApplyListTemplate(ListTemplate_Param as WordListTemplate, ContinuePreviousList_Param as variant, DefaultListBehavior_Param as variant)
  3088.     Sub ApplyListTemplateOld(ListTemplate_Param as WordListTemplate, ContinuePreviousList_Param as variant)
  3089.     Function CanContinuePreviousList(ListTemplate_Param as WordListTemplate) as integer
  3090.     Sub ConvertNumbersToText(NumberType_Param as variant)
  3091.     Function CountNumberedItems(NumberType_Param as variant, Level_Param as variant) as integer
  3092.     Sub RemoveNumbers(NumberType_Param as variant)
  3093. End Class
  3094.  
  3095. Class WordLists
  3096. inherits OLEObject
  3097.     dim Application as WordApplication
  3098.     dim Count as integer
  3099.     dim Creator as integer
  3100.     dim Parent as OLEObject
  3101.     dim _NewEnum as OLEObject
  3102.     Function Item(Index_Param as integer) as WordList
  3103. End Class
  3104.  
  3105. Class WordListGallery
  3106. inherits OLEObject
  3107.     dim Application as WordApplication
  3108.     dim Creator as integer
  3109.     dim ListTemplates as WordListTemplates
  3110.     dim Parent as OLEObject
  3111.     Function Modified(Index_Param as integer) as boolean
  3112.     Sub Reset(Index_Param as integer)
  3113. End Class
  3114.  
  3115. Class WordListGalleries
  3116. inherits OLEObject
  3117.     dim Application as WordApplication
  3118.     dim Count as integer
  3119.     dim Creator as integer
  3120.     dim Parent as OLEObject
  3121.     dim _NewEnum as OLEObject
  3122.     Function Item(Index_Param as integer) as WordListGallery
  3123. End Class
  3124.  
  3125. Class WordKeyBindings
  3126. inherits OLEObject
  3127.     dim Application as WordApplication
  3128.     dim Context as OLEObject
  3129.     dim Count as integer
  3130.     dim Creator as integer
  3131.     dim Parent as OLEObject
  3132.     dim _NewEnum as OLEObject
  3133.     Function Add(KeyCategory_Param as integer, Command_Param as string, KeyCode_Param as integer, KeyCode2_Param as variant, CommandParameter_Param as variant) as WordKeyBinding
  3134.     Sub ClearAll()
  3135.     Function Item(Index_Param as integer) as WordKeyBinding
  3136.     Function Key(KeyCode_Param as integer, KeyCode2_Param as variant) as WordKeyBinding
  3137. End Class
  3138.  
  3139. Class WordKeysBoundTo
  3140. inherits OLEObject
  3141.     dim Application as WordApplication
  3142.     dim Command as string
  3143.     dim CommandParameter as string
  3144.     dim Context as OLEObject
  3145.     dim Count as integer
  3146.     dim Creator as integer
  3147.     dim KeyCategory as integer
  3148.     dim Parent as OLEObject
  3149.     dim _NewEnum as OLEObject
  3150.     Function Item(Index_Param as integer) as WordKeyBinding
  3151.     Function Key(KeyCode_Param as integer, KeyCode2_Param as variant) as WordKeyBinding
  3152. End Class
  3153.  
  3154. Class WordKeyBinding
  3155. inherits OLEObject
  3156.     dim Application as WordApplication
  3157.     dim Command as string
  3158.     dim CommandParameter as string
  3159.     dim Context as OLEObject
  3160.     dim Creator as integer
  3161.     dim KeyCategory as integer
  3162.     dim KeyCode as integer
  3163.     dim KeyCode2 as integer
  3164.     dim KeyString as string
  3165.     dim Parent as OLEObject
  3166.     dim Protected_ as boolean
  3167.     Sub Clear()
  3168.     Sub Disable()
  3169.     Sub Execute()
  3170.     Sub Rebind(KeyCategory_Param as integer, Command_Param as string, CommandParameter_Param as variant)
  3171. End Class
  3172.  
  3173. Class WordFileConverter
  3174. inherits OLEObject
  3175.     dim Application as WordApplication
  3176.     dim CanOpen as boolean
  3177.     dim CanSave as boolean
  3178.     dim ClassName as string
  3179.     dim Creator as integer
  3180.     dim Extensions as string
  3181.     dim FormatName as string
  3182.     dim Name as string
  3183.     dim OpenFormat as integer
  3184.     dim Parent as OLEObject
  3185.     dim Path as string
  3186.     dim SaveFormat as integer
  3187. End Class
  3188.  
  3189. Class WordFileConverters
  3190. inherits OLEObject
  3191.     dim Application as WordApplication
  3192.     dim ConvertMacWordChevrons as integer
  3193.     dim Count as integer
  3194.     dim Creator as integer
  3195.     dim Parent as OLEObject
  3196.     dim _NewEnum as OLEObject
  3197.     Function Item(Index_Param as variant) as WordFileConverter
  3198. End Class
  3199.  
  3200. Class WordSynonymInfo
  3201. inherits OLEObject
  3202.     dim AntonymList as variant
  3203.     dim Application as WordApplication
  3204.     dim Creator as integer
  3205.     dim Found as boolean
  3206.     dim MeaningCount as integer
  3207.     dim MeaningList as variant
  3208.     dim Parent as OLEObject
  3209.     dim PartOfSpeechList as variant
  3210.     dim RelatedExpressionList as variant
  3211.     dim RelatedWordList as variant
  3212.     dim Word as string
  3213.     Function SynonymList(Meaning_Param as variant) as variant
  3214. End Class
  3215.  
  3216. Class WordHyperlinks
  3217. inherits OLEObject
  3218.     dim Application as WordApplication
  3219.     dim Count as integer
  3220.     dim Creator as integer
  3221.     dim Parent as OLEObject
  3222.     dim _NewEnum as OLEObject
  3223.     Function Add(Anchor_Param as OLEObject, Address_Param as variant, SubAddress_Param as variant, ScreenTip_Param as variant, TextToDisplay_Param as variant, Target_Param as variant) as WordHyperlink
  3224.     Function Item(Index_Param as variant) as WordHyperlink
  3225.     Function _Add(Anchor_Param as OLEObject, Address_Param as variant, SubAddress_Param as variant) as WordHyperlink
  3226. End Class
  3227.  
  3228. Class WordHyperlink
  3229. inherits OLEObject
  3230.     dim Address as string
  3231.     dim AddressOld as string
  3232.     dim Application as WordApplication
  3233.     dim Creator as integer
  3234.     dim EmailSubject as string
  3235.     dim ExtraInfoRequired as boolean
  3236.     dim Name as string
  3237.     dim Parent as OLEObject
  3238.     dim Range as WordRange
  3239.     dim ScreenTip as string
  3240.     dim Shape as WordShape
  3241.     dim SubAddress as string
  3242.     dim SubAddressOld as string
  3243.     dim Target as string
  3244.     dim TextToDisplay as string
  3245.     dim Type as integer
  3246.     Sub AddToFavorites()
  3247.     Sub CreateNewDocument(FileName_Param as string, EditNow_Param as boolean, Overwrite_Param as boolean)
  3248.     Sub Delete()
  3249.     Sub Follow(NewWindow_Param as variant, AddHistory_Param as variant, ExtraInfo_Param as variant, Method_Param as variant, HeaderInfo_Param as variant)
  3250. End Class
  3251.  
  3252. Class WordShapes
  3253. inherits OLEObject
  3254.     dim Application as WordApplication
  3255.     dim Count as integer
  3256.     dim Creator as integer
  3257.     dim Parent as OLEObject
  3258.     dim _NewEnum as OLEObject
  3259.     Function AddCallout(Type_Param as integer, Left_Param as single, Top_Param as single, Width_Param as single, Height_Param as single, Anchor_Param as variant) as WordShape
  3260.     Function AddConnector(Type_Param as integer, BeginX_Param as single, BeginY_Param as single, EndX_Param as single, EndY_Param as single) as WordShape
  3261.     Function AddCurve(SafeArrayOfPoints_Param as variant, Anchor_Param as variant) as WordShape
  3262.     Function AddLabel(Orientation_Param as integer, Left_Param as single, Top_Param as single, Width_Param as single, Height_Param as single, Anchor_Param as variant) as WordShape
  3263.     Function AddLine(BeginX_Param as single, BeginY_Param as single, EndX_Param as single, EndY_Param as single, Anchor_Param as variant) as WordShape
  3264.     Function AddOLEControl(ClassType_Param as variant, Left_Param as variant, Top_Param as variant, Width_Param as variant, Height_Param as variant, Anchor_Param as variant) as WordShape
  3265.     Function AddOLEObject(ClassType_Param as variant, FileName_Param as variant, LinkToFile_Param as variant, DisplayAsIcon_Param as variant, IconFileName_Param as variant, IconIndex_Param as variant, IconLabel_Param as variant, Left_Param as variant, Top_Param as variant, Width_Param as variant, Height_Param as variant, Anchor_Param as variant) as WordShape
  3266.     Function AddPicture(FileName_Param as string, LinkToFile_Param as variant, SaveWithDocument_Param as variant, Left_Param as variant, Top_Param as variant, Width_Param as variant, Height_Param as variant, Anchor_Param as variant) as WordShape
  3267.     Function AddPolyline(SafeArrayOfPoints_Param as variant, Anchor_Param as variant) as WordShape
  3268.     Function AddShape(Type_Param as integer, Left_Param as single, Top_Param as single, Width_Param as single, Height_Param as single, Anchor_Param as variant) as WordShape
  3269.     Function AddTextbox(Orientation_Param as integer, Left_Param as single, Top_Param as single, Width_Param as single, Height_Param as single, Anchor_Param as variant) as WordShape
  3270.     Function AddTextEffect(PresetTextEffect_Param as integer, Text_Param as string, FontName_Param as string, FontSize_Param as single, FontBold_Param as integer, FontItalic_Param as integer, Left_Param as single, Top_Param as single, Anchor_Param as variant) as WordShape
  3271.     Function BuildFreeform(EditingType_Param as integer, X1_Param as single, Y1_Param as single) as WordFreeformBuilder
  3272.     Function Item(Index_Param as variant) as WordShape
  3273.     Function Range(Index_Param as variant) as WordShapeRange
  3274.     Sub SelectAll()
  3275. End Class
  3276.  
  3277. Class WordShapeRange
  3278. inherits OLEObject
  3279.     dim Adjustments as WordAdjustments
  3280.     dim AlternativeText as string
  3281.     dim Anchor as WordRange
  3282.     dim Application as WordApplication
  3283.     dim AutoShapeType as integer
  3284.     dim Callout as WordCalloutFormat
  3285.     dim ConnectionSiteCount as integer
  3286.     dim Connector as integer
  3287.     dim ConnectorFormat as WordConnectorFormat
  3288.     dim Count as integer
  3289.     dim Creator as integer
  3290.     dim Fill as WordFillFormat
  3291.     dim GroupItems as WordGroupShapes
  3292.     dim Height as single
  3293.     dim HorizontalFlip as integer
  3294.     dim Hyperlink as WordHyperlink
  3295.     dim Left as single
  3296.     dim Line as WordLineFormat
  3297.     dim LockAnchor as integer
  3298.     dim LockAspectRatio as integer
  3299.     dim Name as string
  3300.     dim Nodes as WordShapeNodes
  3301.     dim Parent as OLEObject
  3302.     dim PictureFormat as WordPictureFormat
  3303.     dim RelativeHorizontalPosition as integer
  3304.     dim RelativeVerticalPosition as integer
  3305.     dim Rotation as single
  3306.     dim Shadow as WordShadowFormat
  3307.     dim TextEffect as WordTextEffectFormat
  3308.     dim TextFrame as WordTextFrame
  3309.     dim ThreeD as WordThreeDFormat
  3310.     dim Top as single
  3311.     dim Type as integer
  3312.     dim VerticalFlip as integer
  3313.     dim Vertices as variant
  3314.     dim Visible as integer
  3315.     dim Width as single
  3316.     dim WrapFormat as WordWrapFormat
  3317.     dim ZOrderPosition as integer
  3318.     dim _NewEnum as OLEObject
  3319.     Sub Activate()
  3320.     Sub Align(Align_Param as integer, RelativeTo_Param as integer)
  3321.     Sub Apply()
  3322.     Function ConvertToFrame() as WordFrame
  3323.     Function ConvertToInlineShape() as WordInlineShape
  3324.     Sub Delete()
  3325.     Sub Distribute(Distribute_Param as integer, RelativeTo_Param as integer)
  3326.     Function Duplicate() as WordShapeRange
  3327.     Sub Flip(FlipCmd_Param as integer)
  3328.     Function Group() as WordShape
  3329.     Sub IncrementLeft(Increment_Param as single)
  3330.     Sub IncrementRotation(Increment_Param as single)
  3331.     Sub IncrementTop(Increment_Param as single)
  3332.     Function Item(Index_Param as variant) as WordShape
  3333.     Sub PickUp()
  3334.     Function Regroup() as WordShape
  3335.     Sub RerouteConnections()
  3336.     Sub ScaleHeight(Factor_Param as single, RelativeToOriginalSize_Param as integer, Scale_Param as integer)
  3337.     Sub ScaleWidth(Factor_Param as single, RelativeToOriginalSize_Param as integer, Scale_Param as integer)
  3338.     Sub Select_(Replace_Param as variant)
  3339.     Sub SetShapesDefaultProperties()
  3340.     Function Ungroup() as WordShapeRange
  3341.     Sub ZOrder(ZOrderCmd_Param as integer)
  3342. End Class
  3343.  
  3344. Class WordGroupShapes
  3345. inherits OLEObject
  3346.     dim Application as WordApplication
  3347.     dim Count as integer
  3348.     dim Creator as integer
  3349.     dim Parent as OLEObject
  3350.     dim _NewEnum as OLEObject
  3351.     Function Item(Index_Param as variant) as WordShape
  3352. End Class
  3353.  
  3354. Class WordShape
  3355. inherits OLEObject
  3356.     dim Adjustments as WordAdjustments
  3357.     dim AlternativeText as string
  3358.     dim Anchor as WordRange
  3359.     dim Application as WordApplication
  3360.     dim AutoShapeType as integer
  3361.     dim Callout as WordCalloutFormat
  3362.     dim ConnectionSiteCount as integer
  3363.     dim Connector as integer
  3364.     dim ConnectorFormat as WordConnectorFormat
  3365.     dim Creator as integer
  3366.     dim Fill as WordFillFormat
  3367.     dim GroupItems as WordGroupShapes
  3368.     dim Height as single
  3369.     dim HorizontalFlip as integer
  3370.     dim Hyperlink as WordHyperlink
  3371.     dim Left as single
  3372.     dim Line as WordLineFormat
  3373.     dim LinkFormat as WordLinkFormat
  3374.     dim LockAnchor as integer
  3375.     dim LockAspectRatio as integer
  3376.     dim Name as string
  3377.     dim Nodes as WordShapeNodes
  3378.     dim OLEFormat as WordOLEFormat
  3379.     dim Parent as OLEObject
  3380.     dim PictureFormat as WordPictureFormat
  3381.     dim RelativeHorizontalPosition as integer
  3382.     dim RelativeVerticalPosition as integer
  3383.     dim Rotation as single
  3384.     dim Script as OLEObject
  3385.     dim Shadow as WordShadowFormat
  3386.     dim TextEffect as WordTextEffectFormat
  3387.     dim TextFrame as WordTextFrame
  3388.     dim ThreeD as WordThreeDFormat
  3389.     dim Top as single
  3390.     dim Type as integer
  3391.     dim VerticalFlip as integer
  3392.     dim Vertices as variant
  3393.     dim Visible as integer
  3394.     dim Width as single
  3395.     dim WrapFormat as WordWrapFormat
  3396.     dim ZOrderPosition as integer
  3397.     Sub Activate()
  3398.     Sub Apply()
  3399.     Function ConvertToFrame() as WordFrame
  3400.     Function ConvertToInlineShape() as WordInlineShape
  3401.     Sub Delete()
  3402.     Function Duplicate() as WordShape
  3403.     Sub Flip(FlipCmd_Param as integer)
  3404.     Sub IncrementLeft(Increment_Param as single)
  3405.     Sub IncrementRotation(Increment_Param as single)
  3406.     Sub IncrementTop(Increment_Param as single)
  3407.     Sub PickUp()
  3408.     Sub RerouteConnections()
  3409.     Sub ScaleHeight(Factor_Param as single, RelativeToOriginalSize_Param as integer, Scale_Param as integer)
  3410.     Sub ScaleWidth(Factor_Param as single, RelativeToOriginalSize_Param as integer, Scale_Param as integer)
  3411.     Sub Select_(Replace_Param as variant)
  3412.     Sub SetShapesDefaultProperties()
  3413.     Function Ungroup() as WordShapeRange
  3414.     Sub ZOrder(ZOrderCmd_Param as integer)
  3415. End Class
  3416.  
  3417. Class WordTextFrame
  3418. inherits OLEObject
  3419.     dim Application as WordApplication
  3420.     dim ContainingRange as WordRange
  3421.     dim Creator as integer
  3422.     dim HasText as integer
  3423.     dim MarginBottom as single
  3424.     dim MarginLeft as single
  3425.     dim MarginRight as single
  3426.     dim MarginTop as single
  3427.     dim Next_ as WordTextFrame
  3428.     dim Orientation as integer
  3429.     dim Overflowing as boolean
  3430.     dim Parent as WordShape
  3431.     dim Previous as WordTextFrame
  3432.     dim TextRange as WordRange
  3433.     Sub BreakForwardLink()
  3434.     Function ValidLinkTarget(TargetTextFrame_Param as WordTextFrame) as boolean
  3435. End Class
  3436.  
  3437. Class WordLetterContent
  3438. inherits OLEObject
  3439.     dim Application as WordApplication
  3440.     dim AttentionLine as string
  3441.     dim CCList as string
  3442.     dim Closing as string
  3443.     dim Creator as integer
  3444.     dim DateFormat as string
  3445.     dim Duplicate as WordLetterContent
  3446.     dim EnclosureNumber as integer
  3447.     dim IncludeHeaderFooter as boolean
  3448.     dim InfoBlock as boolean
  3449.     dim Letterhead as boolean
  3450.     dim LetterheadLocation as integer
  3451.     dim LetterheadSize as single
  3452.     dim LetterStyle as integer
  3453.     dim MailingInstructions as string
  3454.     dim PageDesign as string
  3455.     dim Parent as OLEObject
  3456.     dim RecipientAddress as string
  3457.     dim RecipientCode as string
  3458.     dim RecipientGender as integer
  3459.     dim RecipientName as string
  3460.     dim RecipientReference as string
  3461.     dim ReturnAddress as string
  3462.     dim ReturnAddressShortForm as string
  3463.     dim Salutation as string
  3464.     dim SalutationType as integer
  3465.     dim SenderCity as string
  3466.     dim SenderCode as string
  3467.     dim SenderCompany as string
  3468.     dim SenderGender as integer
  3469.     dim SenderInitials as string
  3470.     dim SenderJobTitle as string
  3471.     dim SenderName as string
  3472.     dim SenderReference as string
  3473.     dim Subject as string
  3474. End Class
  3475.  
  3476. Class WordView
  3477. inherits OLEObject
  3478.     dim Application as WordApplication
  3479.     dim BrowseToWindow as integer
  3480.     dim Creator as integer
  3481.     dim Draft as boolean
  3482.     dim EnlargeFontsLessThan as integer
  3483.     dim FieldShading as integer
  3484.     dim FullScreen as boolean
  3485.     dim Magnifier as boolean
  3486.     dim MailMergeDataView as boolean
  3487.     dim Parent as OLEObject
  3488.     dim SeekView as integer
  3489.     dim ShowAll as boolean
  3490.     dim ShowAnimation as boolean
  3491.     dim ShowBookmarks as boolean
  3492.     dim ShowDrawings as boolean
  3493.     dim ShowFieldCodes as boolean
  3494.     dim ShowFirstLineOnly as boolean
  3495.     dim ShowFormat as boolean
  3496.     dim ShowHiddenText as boolean
  3497.     dim ShowHighlight as boolean
  3498.     dim ShowHyphens as boolean
  3499.     dim ShowMainTextLayer as boolean
  3500.     dim ShowObjectAnchors as boolean
  3501.     dim ShowOptionalBreaks as boolean
  3502.     dim ShowParagraphs as boolean
  3503.     dim ShowPicturePlaceHolders as boolean
  3504.     dim ShowSpaces as boolean
  3505.     dim ShowTabs as boolean
  3506.     dim ShowTextBoundaries as boolean
  3507.     dim SplitSpecial as integer
  3508.     dim TableGridlines as boolean
  3509.     dim Type as integer
  3510.     dim WrapToWindow as boolean
  3511.     dim Zoom as WordZoom
  3512.     Sub CollapseOutline(Range_Param as variant)
  3513.     Sub ExpandOutline(Range_Param as variant)
  3514.     Sub NextHeaderFooter()
  3515.     Sub PreviousHeaderFooter()
  3516.     Sub ShowAllHeadings()
  3517.     Sub ShowHeading(Level_Param as integer)
  3518. End Class
  3519.  
  3520. Class WordZoom
  3521. inherits OLEObject
  3522.     dim Application as WordApplication
  3523.     dim Creator as integer
  3524.     dim PageColumns as integer
  3525.     dim PageFit as integer
  3526.     dim PageRows as integer
  3527.     dim Parent as OLEObject
  3528.     dim Percentage as integer
  3529. End Class
  3530.  
  3531. Class WordZooms
  3532. inherits OLEObject
  3533.     dim Application as WordApplication
  3534.     dim Creator as integer
  3535.     dim Parent as OLEObject
  3536.     Function Item(Index_Param as integer) as WordZoom
  3537. End Class
  3538.  
  3539. Class WordInlineShape
  3540. inherits OLEObject
  3541.     dim AlternativeText as string
  3542.     dim Application as WordApplication
  3543.     dim Borders as WordBorders
  3544.     dim Creator as integer
  3545.     dim Field as WordField
  3546.     dim Fill as WordFillFormat
  3547.     dim Height as single
  3548.     dim HorizontalLineFormat as WordHorizontalLineFormat
  3549.     dim Hyperlink as WordHyperlink
  3550.     dim Line as WordLineFormat
  3551.     dim LinkFormat as WordLinkFormat
  3552.     dim LockAspectRatio as integer
  3553.     dim OLEFormat as WordOLEFormat
  3554.     dim OWSAnchor as integer
  3555.     dim Parent as OLEObject
  3556.     dim PictureFormat as WordPictureFormat
  3557.     dim Range as WordRange
  3558.     dim ScaleHeight as single
  3559.     dim ScaleWidth as single
  3560.     dim Script as OLEObject
  3561.     dim TextEffect as WordTextEffectFormat
  3562.     dim Type as integer
  3563.     dim Width as single
  3564.     Sub Activate()
  3565.     Function ConvertToShape() as WordShape
  3566.     Sub Delete()
  3567.     Sub Reset()
  3568.     Sub Select_()
  3569. End Class
  3570.  
  3571. Class WordInlineShapes
  3572. inherits OLEObject
  3573.     dim Application as WordApplication
  3574.     dim Count as integer
  3575.     dim Creator as integer
  3576.     dim Parent as OLEObject
  3577.     dim _NewEnum as OLEObject
  3578.     Function AddHorizontalLine(FileName_Param as string, Range_Param as variant) as WordInlineShape
  3579.     Function AddHorizontalLineStandard(Range_Param as variant) as WordInlineShape
  3580.     Function AddOLEControl(ClassType_Param as variant, Range_Param as variant) as WordInlineShape
  3581.     Function AddOLEObject(ClassType_Param as variant, FileName_Param as variant, LinkToFile_Param as variant, DisplayAsIcon_Param as variant, IconFileName_Param as variant, IconIndex_Param as variant, IconLabel_Param as variant, Range_Param as variant) as WordInlineShape
  3582.     Function AddPicture(FileName_Param as string, LinkToFile_Param as variant, SaveWithDocument_Param as variant, Range_Param as variant) as WordInlineShape
  3583.     Function AddPictureBullet(FileName_Param as string, Range_Param as variant) as WordInlineShape
  3584.     Function Item(Index_Param as integer) as WordInlineShape
  3585.     Function New_(Range_Param as WordRange) as WordInlineShape
  3586. End Class
  3587.  
  3588. Class WordSpellingSuggestions
  3589. inherits OLEObject
  3590.     dim Application as WordApplication
  3591.     dim Count as integer
  3592.     dim Creator as integer
  3593.     dim Parent as OLEObject
  3594.     dim SpellingErrorType as integer
  3595.     dim _NewEnum as OLEObject
  3596.     Function Item(Index_Param as integer) as WordSpellingSuggestion
  3597. End Class
  3598.  
  3599. Class WordSpellingSuggestion
  3600. inherits OLEObject
  3601.     dim Application as WordApplication
  3602.     dim Creator as integer
  3603.     dim Name as string
  3604.     dim Parent as OLEObject
  3605. End Class
  3606.  
  3607. Class WordDictionaries
  3608. inherits OLEObject
  3609.     dim ActiveCustomDictionary as WordDictionary
  3610.     dim Application as WordApplication
  3611.     dim Count as integer
  3612.     dim Creator as integer
  3613.     dim Maximum as integer
  3614.     dim Parent as OLEObject
  3615.     dim _NewEnum as OLEObject
  3616.     Function Add(FileName_Param as string) as WordDictionary
  3617.     Sub ClearAll()
  3618.     Function Item(Index_Param as variant) as WordDictionary
  3619. End Class
  3620.  
  3621. Class WordHangulHanjaConversionDictionaries
  3622. inherits OLEObject
  3623.     dim ActiveCustomDictionary as WordDictionary
  3624.     dim Application as WordApplication
  3625.     dim BuiltinDictionary as WordDictionary
  3626.     dim Count as integer
  3627.     dim Creator as integer
  3628.     dim Maximum as integer
  3629.     dim Parent as OLEObject
  3630.     dim _NewEnum as OLEObject
  3631.     Function Add(FileName_Param as string) as WordDictionary
  3632.     Sub ClearAll()
  3633.     Function Item(Index_Param as variant) as WordDictionary
  3634. End Class
  3635.  
  3636. Class WordDictionary
  3637. inherits OLEObject
  3638.     dim Application as WordApplication
  3639.     dim Creator as integer
  3640.     dim LanguageID as integer
  3641.     dim LanguageSpecific as boolean
  3642.     dim Name as string
  3643.     dim Parent as OLEObject
  3644.     dim Path as string
  3645.     dim ReadOnly as boolean
  3646.     dim Type as integer
  3647.     Sub Delete()
  3648. End Class
  3649.  
  3650. Class WordReadabilityStatistics
  3651. inherits OLEObject
  3652.     dim Application as WordApplication
  3653.     dim Count as integer
  3654.     dim Creator as integer
  3655.     dim Parent as OLEObject
  3656.     dim _NewEnum as OLEObject
  3657.     Function Item(Index_Param as variant) as WordReadabilityStatistic
  3658. End Class
  3659.  
  3660. Class WordReadabilityStatistic
  3661. inherits OLEObject
  3662.     dim Application as WordApplication
  3663.     dim Creator as integer
  3664.     dim Name as string
  3665.     dim Parent as OLEObject
  3666.     dim Value as single
  3667. End Class
  3668.  
  3669. Class WordVersions
  3670. inherits OLEObject
  3671.     dim Application as WordApplication
  3672.     dim AutoVersion as integer
  3673.     dim Count as integer
  3674.     dim Creator as integer
  3675.     dim Parent as OLEObject
  3676.     dim _NewEnum as OLEObject
  3677.     Function Item(Index_Param as integer) as WordVersion
  3678.     Sub Save(Comment_Param as variant)
  3679. End Class
  3680.  
  3681. Class WordVersion
  3682. inherits OLEObject
  3683.     dim Application as WordApplication
  3684.     dim Comment as string
  3685.     dim Creator as integer
  3686.     dim Date as variant
  3687.     dim Index as integer
  3688.     dim Parent as OLEObject
  3689.     dim SavedBy as string
  3690.     Sub Delete()
  3691.     Function Open() as WordDocument
  3692.     Sub OpenOld()
  3693. End Class
  3694.  
  3695. Class WordOptions
  3696. inherits OLEObject
  3697.     dim AddBiDirectionalMarksWhenSavingTextFile as boolean
  3698.     dim AddControlCharacters as boolean
  3699.     dim AddHebDoubleQuote as boolean
  3700.     dim AllowAccentedUppercase as boolean
  3701.     dim AllowClickAndTypeMouse as boolean
  3702.     dim AllowCombinedAuxiliaryForms as boolean
  3703.     dim AllowCompoundNounProcessing as boolean
  3704.     dim AllowDragAndDrop as boolean
  3705.     dim AllowFastSave as boolean
  3706.     dim AllowPixelUnits as boolean
  3707.     dim AnimateScreenMovements as boolean
  3708.     dim Application as WordApplication
  3709.     dim ApplyFarEastFontsToAscii as boolean
  3710.     dim ArabicMode as integer
  3711.     dim ArabicNumeral as integer
  3712.     dim AutoFormatApplyBulletedLists as boolean
  3713.     dim AutoFormatApplyFirstIndents as boolean
  3714.     dim AutoFormatApplyHeadings as boolean
  3715.     dim AutoFormatApplyLists as boolean
  3716.     dim AutoFormatApplyOtherParas as boolean
  3717.     dim AutoFormatAsYouTypeApplyBorders as boolean
  3718.     dim AutoFormatAsYouTypeApplyBulletedLists as boolean
  3719.     dim AutoFormatAsYouTypeApplyClosings as boolean
  3720.     dim AutoFormatAsYouTypeApplyDates as boolean
  3721.     dim AutoFormatAsYouTypeApplyFirstIndents as boolean
  3722.     dim AutoFormatAsYouTypeApplyHeadings as boolean
  3723.     dim AutoFormatAsYouTypeApplyNumberedLists as boolean
  3724.     dim AutoFormatAsYouTypeApplyTables as boolean
  3725.     dim AutoFormatAsYouTypeAutoLetterWizard as boolean
  3726.     dim AutoFormatAsYouTypeDefineStyles as boolean
  3727.     dim AutoFormatAsYouTypeDeleteAutoSpaces as boolean
  3728.     dim AutoFormatAsYouTypeFormatListItemBeginning as boolean
  3729.     dim AutoFormatAsYouTypeInsertClosings as boolean
  3730.     dim AutoFormatAsYouTypeInsertOvers as boolean
  3731.     dim AutoFormatAsYouTypeMatchParentheses as boolean
  3732.     dim AutoFormatAsYouTypeReplaceFarEastDashes as boolean
  3733.     dim AutoFormatAsYouTypeReplaceFractions as boolean
  3734.     dim AutoFormatAsYouTypeReplaceHyperlinks as boolean
  3735.     dim AutoFormatAsYouTypeReplaceOrdinals as boolean
  3736.     dim AutoFormatAsYouTypeReplacePlainTextEmphasis as boolean
  3737.     dim AutoFormatAsYouTypeReplaceQuotes as boolean
  3738.     dim AutoFormatAsYouTypeReplaceSymbols as boolean
  3739.     dim AutoFormatDeleteAutoSpaces as boolean
  3740.     dim AutoFormatMatchParentheses as boolean
  3741.     dim AutoFormatPlainTextWordMail as boolean
  3742.     dim AutoFormatPreserveStyles as boolean
  3743.     dim AutoFormatReplaceFarEastDashes as boolean
  3744.     dim AutoFormatReplaceFractions as boolean
  3745.     dim AutoFormatReplaceHyperlinks as boolean
  3746.     dim AutoFormatReplaceOrdinals as boolean
  3747.     dim AutoFormatReplacePlainTextEmphasis as boolean
  3748.     dim AutoFormatReplaceQuotes as boolean
  3749.     dim AutoFormatReplaceSymbols as boolean
  3750.     dim AutoKeyboardSwitching as boolean
  3751.     dim AutoWordSelection as boolean
  3752.     dim BackgroundSave as boolean
  3753.     dim BlueScreen as boolean
  3754.     dim ButtonFieldClicks as integer
  3755.     dim CheckGrammarAsYouType as boolean
  3756.     dim CheckGrammarWithSpelling as boolean
  3757.     dim CheckHangulEndings as boolean
  3758.     dim CheckSpellingAsYouType as boolean
  3759.     dim ConfirmConversions as boolean
  3760.     dim ConvertHighAnsiToFarEast as boolean
  3761.     dim CreateBackup as boolean
  3762.     dim Creator as integer
  3763.     dim CursorMovement as integer
  3764.     dim DefaultBorderColor as integer
  3765.     dim DefaultBorderColorIndex as integer
  3766.     dim DefaultBorderLineStyle as integer
  3767.     dim DefaultBorderLineWidth as integer
  3768.     dim DefaultHighlightColorIndex as integer
  3769.     dim DefaultOpenFormat as integer
  3770.     dim DefaultTray as string
  3771.     dim DefaultTrayID as integer
  3772.     dim DeletedTextColor as integer
  3773.     dim DeletedTextMark as integer
  3774.     dim DiacriticColorVal as integer
  3775.     dim DisplayGridLines as boolean
  3776.     dim DocumentViewDirection as integer
  3777.     dim EnableHangulHanjaRecentOrdering as boolean
  3778.     dim EnableMisusedWordsDictionary as boolean
  3779.     dim EnableSound as boolean
  3780.     dim EnvelopeFeederInstalled as boolean
  3781.     dim GridDistanceHorizontal as single
  3782.     dim GridDistanceVertical as single
  3783.     dim GridOriginHorizontal as single
  3784.     dim GridOriginVertical as single
  3785.     dim HangulHanjaFastConversion as boolean
  3786.     dim HebrewMode as integer
  3787.     dim IgnoreInternetAndFileAddresses as boolean
  3788.     dim IgnoreMixedDigits as boolean
  3789.     dim IgnoreUppercase as boolean
  3790.     dim IMEAutomaticControl as boolean
  3791.     dim InlineConversion as boolean
  3792.     dim InsertedTextColor as integer
  3793.     dim InsertedTextMark as integer
  3794.     dim INSKeyForPaste as boolean
  3795.     dim InterpretHighAnsi as integer
  3796.     dim MapPaperSize as boolean
  3797.     dim MatchFuzzyAY as boolean
  3798.     dim MatchFuzzyBV as boolean
  3799.     dim MatchFuzzyByte as boolean
  3800.     dim MatchFuzzyCase as boolean
  3801.     dim MatchFuzzyDash as boolean
  3802.     dim MatchFuzzyDZ as boolean
  3803.     dim MatchFuzzyHF as boolean
  3804.     dim MatchFuzzyHiragana as boolean
  3805.     dim MatchFuzzyIterationMark as boolean
  3806.     dim MatchFuzzyKanji as boolean
  3807.     dim MatchFuzzyKiKu as boolean
  3808.     dim MatchFuzzyOldKana as boolean
  3809.     dim MatchFuzzyProlongedSoundMark as boolean
  3810.     dim MatchFuzzyPunctuation as boolean
  3811.     dim MatchFuzzySmallKana as boolean
  3812.     dim MatchFuzzySpace as boolean
  3813.     dim MatchFuzzyTC as boolean
  3814.     dim MatchFuzzyZJ as boolean
  3815.     dim MeasurementUnit as integer
  3816.     dim MonthNames as integer
  3817.     dim MultipleWordConversionsMode as integer
  3818.     dim OptimizeForWord97byDefault as boolean
  3819.     dim Overtype as boolean
  3820.     dim Pagination as boolean
  3821.     dim Parent as OLEObject
  3822.     dim PictureEditor as string
  3823.     dim PrintBackground as boolean
  3824.     dim PrintComments as boolean
  3825.     dim PrintDraft as boolean
  3826.     dim PrintDrawingObjects as boolean
  3827.     dim PrintEvenPagesInAscendingOrder as boolean
  3828.     dim PrintFieldCodes as boolean
  3829.     dim PrintHiddenText as boolean
  3830.     dim PrintOddPagesInAscendingOrder as boolean
  3831.     dim PrintProperties as boolean
  3832.     dim PrintReverse as boolean
  3833.     dim ReplaceSelection as boolean
  3834.     dim RevisedLinesColor as integer
  3835.     dim RevisedLinesMark as integer
  3836.     dim RevisedPropertiesColor as integer
  3837.     dim RevisedPropertiesMark as integer
  3838.     dim RTFInClipboard as boolean
  3839.     dim SaveInterval as integer
  3840.     dim SaveNormalPrompt as boolean
  3841.     dim SavePropertiesPrompt as boolean
  3842.     dim SendMailAttach as boolean
  3843.     dim ShortMenuNames as boolean
  3844.     dim ShowControlCharacters as boolean
  3845.     dim ShowDiacritics as boolean
  3846.     dim ShowReadabilityStatistics as boolean
  3847.     dim SmartCutPaste as boolean
  3848.     dim SnapToGrid as boolean
  3849.     dim SnapToShapes as boolean
  3850.     dim StrictFinalYaa as boolean
  3851.     dim StrictInitialAlefHamza as boolean
  3852.     dim SuggestFromMainDictionaryOnly as boolean
  3853.     dim SuggestSpellingCorrections as boolean
  3854.     dim TabIndentKey as boolean
  3855.     dim UpdateFieldsAtPrint as boolean
  3856.     dim UpdateLinksAtOpen as boolean
  3857.     dim UpdateLinksAtPrint as boolean
  3858.     dim UseCharacterUnit as boolean
  3859.     dim UseDiffDiacColor as boolean
  3860.     dim UseGermanSpellingReform as boolean
  3861.     dim VirusProtection as boolean
  3862.     dim VisualSelection as integer
  3863.     dim WPDocNavKeys as boolean
  3864.     dim WPHelp as boolean
  3865.     Function DefaultFilePath(Path_Param as integer) as string
  3866.     Sub SetWPHelpOptions(CommandKeyHelp_Param as variant, DocNavigationKeys_Param as variant, MouseSimulation_Param as variant, DemoGuidance_Param as variant, DemoSpeed_Param as variant, HelpType_Param as variant)
  3867. End Class
  3868.  
  3869. Class WordMailMessage
  3870. inherits OLEObject
  3871.     dim Application as WordApplication
  3872.     dim Creator as integer
  3873.     dim Parent as OLEObject
  3874.     Sub CheckName()
  3875.     Sub Delete()
  3876.     Sub DisplayMoveDialog()
  3877.     Sub DisplayProperties()
  3878.     Sub DisplaySelectNamesDialog()
  3879.     Sub Forward()
  3880.     Sub GoToNext()
  3881.     Sub GoToPrevious()
  3882.     Sub Reply()
  3883.     Sub ReplyAll()
  3884.     Sub ToggleHeader()
  3885. End Class
  3886.  
  3887. Class WordProofreadingErrors
  3888. inherits OLEObject
  3889.     dim Application as WordApplication
  3890.     dim Count as integer
  3891.     dim Creator as integer
  3892.     dim Parent as OLEObject
  3893.     dim Type as integer
  3894.     dim _NewEnum as OLEObject
  3895.     Function Item(Index_Param as integer) as WordRange
  3896. End Class
  3897.  
  3898. Class WordMailer
  3899. inherits OLEObject
  3900.     dim Application as WordApplication
  3901.     dim BCCRecipients as variant
  3902.     dim CCRecipients as variant
  3903.     dim Creator as integer
  3904.     dim Enclosures as variant
  3905.     dim Parent as OLEObject
  3906.     dim Received as boolean
  3907.     dim Recipients as variant
  3908.     dim SendDateTime as variant
  3909.     dim Sender as string
  3910.     dim Subject as string
  3911. End Class
  3912.  
  3913. Class WordWrapFormat
  3914. inherits OLEObject
  3915.     dim AllowOverlap as integer
  3916.     dim Application as WordApplication
  3917.     dim Creator as integer
  3918.     dim DistanceBottom as single
  3919.     dim DistanceLeft as single
  3920.     dim DistanceRight as single
  3921.     dim DistanceTop as single
  3922.     dim Parent as OLEObject
  3923.     dim Side as integer
  3924.     dim Type as integer
  3925. End Class
  3926.  
  3927. Class WordHangulAndAlphabetExceptions
  3928. inherits OLEObject
  3929.     dim Application as WordApplication
  3930.     dim Count as integer
  3931.     dim Creator as integer
  3932.     dim Parent as OLEObject
  3933.     dim _NewEnum as OLEObject
  3934.     Function Add(Name_Param as string) as WordHangulAndAlphabetException
  3935.     Function Item(Index_Param as variant) as WordHangulAndAlphabetException
  3936. End Class
  3937.  
  3938. Class WordHangulAndAlphabetException
  3939. inherits OLEObject
  3940.     dim Application as WordApplication
  3941.     dim Creator as integer
  3942.     dim Index as integer
  3943.     dim Name as string
  3944.     dim Parent as OLEObject
  3945.     Sub Delete()
  3946. End Class
  3947.  
  3948. Class WordAdjustments
  3949. inherits OLEObject
  3950.     dim Application as WordApplication
  3951.     dim Count as integer
  3952.     dim Creator as integer
  3953.     dim Parent as OLEObject
  3954.     Function Item(Index_Param as integer) as single
  3955. End Class
  3956.  
  3957. Class WordCalloutFormat
  3958. inherits OLEObject
  3959.     dim Accent as integer
  3960.     dim Angle as integer
  3961.     dim Application as WordApplication
  3962.     dim AutoAttach as integer
  3963.     dim AutoLength as integer
  3964.     dim Border as integer
  3965.     dim Creator as integer
  3966.     dim Drop as single
  3967.     dim DropType as integer
  3968.     dim Gap as single
  3969.     dim Length as single
  3970.     dim Parent as OLEObject
  3971.     dim Type as integer
  3972.     Sub AutomaticLength()
  3973.     Sub CustomDrop(Drop_Param as single)
  3974.     Sub CustomLength(Length_Param as single)
  3975.     Sub PresetDrop(DropType_Param as integer)
  3976. End Class
  3977.  
  3978. Class WordColorFormat
  3979. inherits OLEObject
  3980.     dim Application as WordApplication
  3981.     dim Creator as integer
  3982.     dim Parent as OLEObject
  3983.     dim RGB as integer
  3984.     dim SchemeColor as integer
  3985.     dim Type as integer
  3986. End Class
  3987.  
  3988. Class WordConnectorFormat
  3989. inherits OLEObject
  3990.     dim Application as WordApplication
  3991.     dim BeginConnected as integer
  3992.     dim BeginConnectedShape as WordShape
  3993.     dim BeginConnectionSite as integer
  3994.     dim Creator as integer
  3995.     dim EndConnected as integer
  3996.     dim EndConnectedShape as WordShape
  3997.     dim EndConnectionSite as integer
  3998.     dim Parent as OLEObject
  3999.     dim Type as integer
  4000.     Sub BeginConnect(byref ConnectedShape_Param as WordShape, ConnectionSite_Param as integer)
  4001.     Sub BeginDisconnect()
  4002.     Sub EndConnect(byref ConnectedShape_Param as WordShape, ConnectionSite_Param as integer)
  4003.     Sub EndDisconnect()
  4004. End Class
  4005.  
  4006. Class WordFillFormat
  4007. inherits OLEObject
  4008.     dim Application as WordApplication
  4009.     dim BackColor as WordColorFormat
  4010.     dim Creator as integer
  4011.     dim ForeColor as WordColorFormat
  4012.     dim GradientColorType as integer
  4013.     dim GradientDegree as single
  4014.     dim GradientStyle as integer
  4015.     dim GradientVariant as integer
  4016.     dim Parent as OLEObject
  4017.     dim Pattern as integer
  4018.     dim PresetGradientType as integer
  4019.     dim PresetTexture as integer
  4020.     dim TextureName as string
  4021.     dim TextureType as integer
  4022.     dim Transparency as single
  4023.     dim Type as integer
  4024.     dim Visible as integer
  4025.     Sub Background()
  4026.     Sub OneColorGradient(Style_Param as integer, Variant_Param as integer, Degree_Param as single)
  4027.     Sub Patterned(Pattern_Param as integer)
  4028.     Sub PresetGradient(Style_Param as integer, Variant_Param as integer, PresetGradientType_Param as integer)
  4029.     Sub PresetTextured(PresetTexture_Param as integer)
  4030.     Sub Solid()
  4031.     Sub TwoColorGradient(Style_Param as integer, Variant_Param as integer)
  4032.     Sub UserPicture(PictureFile_Param as string)
  4033.     Sub UserTextured(TextureFile_Param as string)
  4034. End Class
  4035.  
  4036. Class WordFreeformBuilder
  4037. inherits OLEObject
  4038.     dim Application as WordApplication
  4039.     dim Creator as integer
  4040.     dim Parent as OLEObject
  4041.     Sub AddNodes(SegmentType_Param as integer, EditingType_Param as integer, X1_Param as single, Y1_Param as single, X2_Param as single, Y2_Param as single, X3_Param as single, Y3_Param as single)
  4042.     Function ConvertToShape(Anchor_Param as variant) as WordShape
  4043. End Class
  4044.  
  4045. Class WordLineFormat
  4046. inherits OLEObject
  4047.     dim Application as WordApplication
  4048.     dim BackColor as WordColorFormat
  4049.     dim BeginArrowheadLength as integer
  4050.     dim BeginArrowheadStyle as integer
  4051.     dim BeginArrowheadWidth as integer
  4052.     dim Creator as integer
  4053.     dim DashStyle as integer
  4054.     dim EndArrowheadLength as integer
  4055.     dim EndArrowheadStyle as integer
  4056.     dim EndArrowheadWidth as integer
  4057.     dim ForeColor as WordColorFormat
  4058.     dim Parent as OLEObject
  4059.     dim Pattern as integer
  4060.     dim Style as integer
  4061.     dim Transparency as single
  4062.     dim Visible as integer
  4063.     dim Weight as single
  4064. End Class
  4065.  
  4066. Class WordPictureFormat
  4067. inherits OLEObject
  4068.     dim Application as WordApplication
  4069.     dim Brightness as single
  4070.     dim ColorType as integer
  4071.     dim Contrast as single
  4072.     dim Creator as integer
  4073.     dim CropBottom as single
  4074.     dim CropLeft as single
  4075.     dim CropRight as single
  4076.     dim CropTop as single
  4077.     dim Parent as OLEObject
  4078.     dim TransparencyColor as integer
  4079.     dim TransparentBackground as integer
  4080.     Sub IncrementBrightness(Increment_Param as single)
  4081.     Sub IncrementContrast(Increment_Param as single)
  4082. End Class
  4083.  
  4084. Class WordShadowFormat
  4085. inherits OLEObject
  4086.     dim Application as WordApplication
  4087.     dim Creator as integer
  4088.     dim ForeColor as WordColorFormat
  4089.     dim Obscured as integer
  4090.     dim OffsetX as single
  4091.     dim OffsetY as single
  4092.     dim Parent as OLEObject
  4093.     dim Transparency as single
  4094.     dim Type as integer
  4095.     dim Visible as integer
  4096.     Sub IncrementOffsetX(Increment_Param as single)
  4097.     Sub IncrementOffsetY(Increment_Param as single)
  4098. End Class
  4099.  
  4100. Class WordShapeNode
  4101. inherits OLEObject
  4102.     dim Application as WordApplication
  4103.     dim Creator as integer
  4104.     dim EditingType as integer
  4105.     dim Parent as OLEObject
  4106.     dim Points as variant
  4107.     dim SegmentType as integer
  4108. End Class
  4109.  
  4110. Class WordShapeNodes
  4111. inherits OLEObject
  4112.     dim Application as WordApplication
  4113.     dim Count as integer
  4114.     dim Creator as integer
  4115.     dim Parent as OLEObject
  4116.     dim _NewEnum as OLEObject
  4117.     Sub Delete(Index_Param as integer)
  4118.     Sub Insert(Index_Param as integer, SegmentType_Param as integer, EditingType_Param as integer, X1_Param as single, Y1_Param as single, X2_Param as single, Y2_Param as single, X3_Param as single, Y3_Param as single)
  4119.     Function Item(Index_Param as variant) as WordShapeNode
  4120.     Sub SetEditingType(Index_Param as integer, EditingType_Param as integer)
  4121.     Sub SetPosition(Index_Param as integer, X1_Param as single, Y1_Param as single)
  4122.     Sub SetSegmentType(Index_Param as integer, SegmentType_Param as integer)
  4123. End Class
  4124.  
  4125. Class WordTextEffectFormat
  4126. inherits OLEObject
  4127.     dim Alignment as integer
  4128.     dim Application as WordApplication
  4129.     dim Creator as integer
  4130.     dim FontBold as integer
  4131.     dim FontItalic as integer
  4132.     dim FontName as string
  4133.     dim FontSize as single
  4134.     dim KernedPairs as integer
  4135.     dim NormalizedHeight as integer
  4136.     dim Parent as OLEObject
  4137.     dim PresetShape as integer
  4138.     dim PresetTextEffect as integer
  4139.     dim RotatedChars as integer
  4140.     dim Text as string
  4141.     dim Tracking as single
  4142.     Sub ToggleVerticalText()
  4143. End Class
  4144.  
  4145. Class WordThreeDFormat
  4146. inherits OLEObject
  4147.     dim Application as WordApplication
  4148.     dim Creator as integer
  4149.     dim Depth as single
  4150.     dim ExtrusionColor as WordColorFormat
  4151.     dim ExtrusionColorType as integer
  4152.     dim Parent as OLEObject
  4153.     dim Perspective as integer
  4154.     dim PresetExtrusionDirection as integer
  4155.     dim PresetLightingDirection as integer
  4156.     dim PresetLightingSoftness as integer
  4157.     dim PresetMaterial as integer
  4158.     dim PresetThreeDFormat as integer
  4159.     dim RotationX as single
  4160.     dim RotationY as single
  4161.     dim Visible as integer
  4162.     Sub IncrementRotationX(Increment_Param as single)
  4163.     Sub IncrementRotationY(Increment_Param as single)
  4164.     Sub ResetRotation()
  4165.     Sub SetExtrusionDirection(PresetExtrusionDirection_Param as integer)
  4166.     Sub SetThreeDFormat(PresetThreeDFormat_Param as integer)
  4167. End Class
  4168.  
  4169. Class WordIApplicationEvents
  4170. inherits OLEObject
  4171.     Sub DocumentChange()
  4172.     Sub Quit()
  4173.     Sub Startup()
  4174. End Class
  4175.  
  4176. Class WordIApplicationEvents2
  4177. inherits OLEObject
  4178.     Sub DocumentBeforeClose(Doc_Param as WordDocument, Cancel_Param as boolean)
  4179.     Sub DocumentBeforePrint(Doc_Param as WordDocument, Cancel_Param as boolean)
  4180.     Sub DocumentBeforeSave(Doc_Param as WordDocument, SaveAsUI_Param as boolean, Cancel_Param as boolean)
  4181.     Sub DocumentChange()
  4182.     Sub DocumentOpen(Doc_Param as WordDocument)
  4183.     Sub NewDocument(Doc_Param as WordDocument)
  4184.     Sub Quit()
  4185.     Sub Startup()
  4186.     Sub WindowActivate(Doc_Param as WordDocument, Wn_Param as WordWindow)
  4187.     Sub WindowBeforeDoubleClick(Sel_Param as WordSelection, Cancel_Param as boolean)
  4188.     Sub WindowBeforeRightClick(Sel_Param as WordSelection, Cancel_Param as boolean)
  4189.     Sub WindowDeactivate(Doc_Param as WordDocument, Wn_Param as WordWindow)
  4190.     Sub WindowSelectionChange(Sel_Param as WordSelection)
  4191. End Class
  4192.  
  4193. Class WordEmailAuthor
  4194. inherits OLEObject
  4195.     dim Application as WordApplication
  4196.     dim Creator as integer
  4197.     dim Parent as OLEObject
  4198.     dim Style as WordStyle
  4199. End Class
  4200.  
  4201. Class WordEmailOptions
  4202. inherits OLEObject
  4203.     dim Application as WordApplication
  4204.     dim ComposeStyle as WordStyle
  4205.     dim Creator as integer
  4206.     dim EmailSignature as WordEmailSignature
  4207.     dim MarkComments as boolean
  4208.     dim MarkCommentsWith as string
  4209.     dim Parent as OLEObject
  4210.     dim ReplyStyle as WordStyle
  4211.     dim ThemeName as string
  4212.     dim UseThemeStyle as boolean
  4213. End Class
  4214.  
  4215. Class WordEmailSignature
  4216. inherits OLEObject
  4217.     dim Application as WordApplication
  4218.     dim Creator as integer
  4219.     dim NewMessageSignature as string
  4220.     dim Parent as OLEObject
  4221.     dim ReplyMessageSignature as string
  4222. End Class
  4223.  
  4224. Class WordEmail
  4225. inherits OLEObject
  4226.     dim Application as WordApplication
  4227.     dim Creator as integer
  4228.     dim CurrentEmailAuthor as WordEmailAuthor
  4229.     dim Parent as OLEObject
  4230. End Class
  4231.  
  4232. Class WordHorizontalLineFormat
  4233. inherits OLEObject
  4234.     dim Alignment as integer
  4235.     dim Application as WordApplication
  4236.     dim Creator as integer
  4237.     dim NoShade as boolean
  4238.     dim Parent as OLEObject
  4239.     dim PercentWidth as single
  4240.     dim WidthType as integer
  4241. End Class
  4242.  
  4243. Class WordFrameset
  4244. inherits OLEObject
  4245.     dim Application as WordApplication
  4246.     dim ChildFramesetCount as integer
  4247.     dim Creator as integer
  4248.     dim FrameDefaultURL as string
  4249.     dim FrameDisplayBorders as boolean
  4250.     dim FrameLinkToFile as boolean
  4251.     dim FrameName as string
  4252.     dim FrameResizable as boolean
  4253.     dim FrameScrollbarType as integer
  4254.     dim FramesetBorderColor as integer
  4255.     dim FramesetBorderWidth as single
  4256.     dim Height as integer
  4257.     dim HeightType as integer
  4258.     dim Parent as OLEObject
  4259.     dim ParentFrameset as WordFrameset
  4260.     dim Type as integer
  4261.     dim Width as integer
  4262.     dim WidthType as integer
  4263.     dim _NewEnum as OLEObject
  4264.     Function AddNewFrame(Where_Param as integer) as WordFrameset
  4265.     Function ChildFramesetItem(Index_Param as integer) as WordFrameset
  4266.     Sub Delete()
  4267. End Class
  4268.  
  4269. Class WordDefaultWebOptions
  4270. inherits OLEObject
  4271.     dim AllowPNG as boolean
  4272.     dim AlwaysSaveInDefaultEncoding as boolean
  4273.     dim Application as WordApplication
  4274.     dim BrowserLevel as integer
  4275.     dim CheckIfOfficeIsHTMLEditor as boolean
  4276.     dim CheckIfWordIsDefaultHTMLEditor as boolean
  4277.     dim Creator as integer
  4278.     dim Encoding as integer
  4279.     dim FolderSuffix as string
  4280.     dim Fonts as OLEObject
  4281.     dim OptimizeForBrowser as boolean
  4282.     dim OrganizeInFolder as boolean
  4283.     dim Parent as OLEObject
  4284.     dim PixelsPerInch as integer
  4285.     dim RelyOnCSS as boolean
  4286.     dim RelyOnVML as boolean
  4287.     dim ScreenSize as integer
  4288.     dim UpdateLinksOnSave as boolean
  4289.     dim UseLongFileNames as boolean
  4290. End Class
  4291.  
  4292. Class WordWebOptions
  4293. inherits OLEObject
  4294.     dim AllowPNG as boolean
  4295.     dim Application as WordApplication
  4296.     dim BrowserLevel as integer
  4297.     dim Creator as integer
  4298.     dim Encoding as integer
  4299.     dim FolderSuffix as string
  4300.     dim OptimizeForBrowser as boolean
  4301.     dim OrganizeInFolder as boolean
  4302.     dim Parent as OLEObject
  4303.     dim PixelsPerInch as integer
  4304.     dim RelyOnCSS as boolean
  4305.     dim RelyOnVML as boolean
  4306.     dim ScreenSize as integer
  4307.     dim UseLongFileNames as boolean
  4308.     Sub UseDefaultFolderSuffix()
  4309. End Class
  4310.  
  4311. Class WordOtherCorrectionsExceptions
  4312. inherits OLEObject
  4313.     dim Application as WordApplication
  4314.     dim Count as integer
  4315.     dim Creator as integer
  4316.     dim Parent as OLEObject
  4317.     dim _NewEnum as OLEObject
  4318.     Function Add(Name_Param as string) as WordOtherCorrectionsException
  4319.     Function Item(Index_Param as variant) as WordOtherCorrectionsException
  4320. End Class
  4321.  
  4322. Class WordOtherCorrectionsException
  4323. inherits OLEObject
  4324.     dim Application as WordApplication
  4325.     dim Creator as integer
  4326.     dim Index as integer
  4327.     dim Name as string
  4328.     dim Parent as OLEObject
  4329.     Sub Delete()
  4330. End Class
  4331.  
  4332.